---

Ich probiere gerade auf eine Instanz zuzugreifen, die mit einem Constraint verbunden ist.
Bisher bin ich vom Constraint bis zum DisplayName gekommen; jetzt möchte ich auf die Instanz zugreifen um abzugleichen, ob das Bauteil selektiert ist.

Code:

---

Language="VBSCRIPT"

Sub CATMain()
Set oDoc = CATIA.ActiveDocument
Set oProduct = oDoc.Product
Set oConstraints = oDoc.Product.Connections("CATIAConstraints")

Set oConstraint = oConstraints.Item(1)
Set oConstraintElement1 = oConstraint.GetConstraintElement(1)
MsgBox "DisplayName: " & oConstraintElement1.DisplayName
Set oConstraintProduct1 = oProduct.FindObjectByName(oConstraintElement1.DisplayName)
MsgBox oConstraintProduct1.Name

End Sub

---

In der fett gedruckten Zeile steigt das Makro aus. Ich vermute, dass FindObjectByName für PartDesign ist.
Wie erhalte ich Zugriff auf die Instanz?

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Servus Lionel

Der Displayname hat folgenden Aufbau RootproductName/InstanceName/!GeoElementName (sehr einfaches Beipeil).
Ich würde den String zerlegen (String zwischen 1. und 2. "/") und dann per Namen der Products-Collection auf die Instanz zugreifen.

Gruß
Bernd

------------------
Warum einfach, wenn es auch kompliziert geht.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Code:

---

sDisplayname = split(oConstraintElement1.DisplayName,"/")
Set oConstraintProduct1 = oProducts.item(sDisplayName(1))

---

Übrigens vorab Glückwunsch zum 11111. Beitrag.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP