pb a utiliser la fonction for each avec catia v5

[deuxtance]

bonjour tout le monde,

 

je suis en alternance et mon tuteur me demande de créer un macro sur catia. j'ai beaucouq de mal a comprende le language de catia AU SECOUR!!!!

 

mon pb est:

 

differente courbe sont present dans catia et moi je chercherais a les reperer pour pouvoir

exectuter une action dessus

 

en manuel je fais for n 514 to 600 par exemple ma macro fontion mé mooi je voudrais qui les repere tout seul pour exceuter mon action dessus par la suite

 

voici le programme

 

 

Dim hybridShapeCurveExplicit1 As HybridShapeCurveExplicit

 

[surligneur] dim hybridShapeCurveExplicit1 As hybridBodies1.Item("Desassemblage")

for each hybridShapeCurveExplicit1 in hybridBodies1.Item("Desassemblage")[/surligneur] cela ne fontionne pas

 

For n = 521 To 550

 

Set hybridShapeCurveExplicit1 = parameters1.Item("Courbe." & n)

 

Dim reference1 As Reference

Set reference1 = part1.CreateReferenceFromObject(hybridShapeCurveExplicit1)

 

Dim hybridShapeFactory1 As HybridShapeFactory

 

Set hybridShapeFactory1 = part1.HybridShapeFactory

 

Dim hybridShapeCurveSmooth1 As HybridShapeCurveSmooth

 

Set hybridShapeCurveSmooth1 = hybridShapeFactory1.AddNewCurveSmooth(reference1)

 

hybridShapeCurveSmooth1.SetTangencyThreshold 0.5

 

hybridShapeCurveSmooth1.CurvatureThresholdActivity = True

 

hybridShapeCurveSmooth1.CurvatureThreshold = 0.2

 

hybridShapeCurveSmooth1.MaximumDeviationActivity = True

 

hybridShapeCurveSmooth1.SetMaximumDeviation 3#

 

hybridShapeCurveSmooth1.TopologySimplificationActivity = True

 

 

 

 

[sechanbask]

2 méthodes :

 

soit tu nommes la bibliothèque d'objet et donc tu fais

 

for each obj in biblothèque _d_objet

 

exemple sous autocad : for each bloc in blocks

 

 

 

 

ou tu fais un compteur d'objet de ta bibliothèque :

 

for 1 to biblothèque _d_objet.count

 

 

 

Je ne sais pas si je suis clair mais ta ligne :

 

dim hybridShapeCurveExplicit1 As hybridBodies1.Item("Desassemblage")

 

se transformerait certainement en

 

dim hybridShapeCurveExplicit1 As hybridBodies1

 

que ça ne m'étonnerait pas..

[deuxtance]

merci sechanbask de ta reponse je vais essaié le compteur et je te tien au courant.