---

Hallo

Ich möchte die Koordinaten des Punktes mit dem Namen "KP" auslesen.

Einer meiner Versuche:

Sub CATMain()
Dim Koordinaten(1)

Set MySel = CATIA.ActiveDocument.Selection

MySel.Search"CATDrwSearch.2DPoint.Name=KP,all"
MySel.Item(1).GetCoordinates Koordinaten
MsgBox ("X: " & Koordinaten(0) & vbCrLf & "Y: " & Koordinaten(1))
End Sub

Leider erkennt CATIA dabei nicht, dass es sich um einen Punkt handelt und gibt immer X0 Y0 aus.

Über selectElement2 habe ich es auch schon ausprobiert, bekomme dabei aber nur einen angenäherten Wert! Verstehe ich nicht, da der Punkt ja selektiert wird?

Kann ich dem Search mitgeben dass es sich bei dem Suchergebnis um eine Punkt2D handelt?

Oder gibt es einen besseren Ansatz?

Danke
Gruß Martin

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

---

Servus
Versuch mal folgende Änderung:

Code:

---

MySel.Item(1).Value.GetCoordinates Koordinaten

---

Deine Suche selektiert jetzt schon nur 2D-Punkte.

Gruß
Bernd

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

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

---

Hallo Bernd

"Value" das war das Zauberwort!
Danke

Und dass ich 2DPunkte selektiere war mir schon klar.
CATIA hat das wohl nicht als Punkt sondern als Selektionsergebnis interpretiert.

10Us sind unterwegs.

Gruß Martin

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