Inventor : Mettre plusieurs part invisible en même temps

[MKE_Howard]

Bonjour! J'ai lu dans un autre forum que la fonction Component.Visible("") = True/False est seulement pour une part à la fois. Je cherche un moyen de pouvoir l'utiliser une fois pour plusieurs part à la fois, car mon code deviens très gros à force de copier le même code. Exemple de mon code :

If NmbDeStation = 2 Then
	Component.Visible("Sta2") = True
	Component.Visible("Sta3") = False
	Component.Visible("Sta4") = False

If NmbDeStation = 3 Then 
 Component.Visible("Sta2") = True
 Component.Visible("Sta3") = False
 Component.Visible("Sta4") = False

Etc...

Merci

---

Le titre du sujet a été modifié par un modérateur pour faciliter la recherche. Titre original:
Mettre plusieurs part invisible en même temps

[gmassart · Accepted solution]

Bonsoir

Tu peux créer un array avec les nom des pièces dedans et parcourir ton array dans une boucle for then ou for each

Perso je ferais ça, limite tu peux même pousser le bouchon, créer une ipropriété, mettre les noms des pièces dedans séparées par ";" et ensuite utiliser une fonction split sur la ipropriété et tu boucles

[ThomasB44 · Accepted solution]

Salut @MKE_Howard 

Tu peux aussi passer par une collection d'objets :

Dim oOcc As ComponentOccurrence
Dim oOccCol As Inventor.ObjectCollection
oOccCol = ThisApplication.TransientObjects.CreateObjectCollection

oOcc = ThisApplication.CommandManager.Pick(SelectionFilterEnum.kAssemblyOccurrenceFilter, "Select a component :")
		If Not oOcc Is  Nothing Then
		'Add component to collection
		oOccCol.Add(oOcc)