---

Hallo,

weiß jemand wie ich mir den Ursprungspunkt (nicht nur die Koordinaten) einer Linie zurückgeben lassen kann ohne einen neuen Punkt hinzuzufügen? Die Linie wurde durch den User selektiert.

Vielen Dank

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

---

Hallo mgheinz1001
Was genau meinst Du mit zurückgeben?
Und um was für eine Linie handelt es sich? 3D Sketch? 3D Linie? 2D Drawing?
Gruss Gopher

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

---

Hallo mgheinz1001,
Soweit ich weiß hat jede Curve, also auch jede Linie drei interne Punkte (Anfang, Mitte und Ende).
Diese Kannst du über die Koordinaten (X,Y,Z) abfragen ohne diese neu zu erzeugen.

Dim hybridShapeLinePtPt As HybridShape
Dim Coordinates (8)
Set TheMeasurable = TheSPAWorkbench.GetMeasurable(HybridShapeLinePtPt)
TheMeasurable.GetPointsOnCurve Coordinates
X1 = Coordinates(0)  'X-Koordinate Startpunkt
Y1 = Coordinates(1)  'Y-Koordinate Startpunkt
Z1 = Coordinates(2)  'Z-Koordinate Startpunkt
X2 = Coordinates(3)  'X-Koordinate Mittelpunkt
Y2 = Coordinates(4)  'Y-Koordinate Mittelpunkt
Z2 = Coordinates(5)  'Z-Koordinate Mittelpunkt
X3 = Coordinates(6)  'X-Koordinate Endpunkt
Y3 = Coordinates(7)  'Y-Koordinate Endpunkt
Z3 = Coordinates(8)  'Z-Koordinate Endpunkt

Viel Glück

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

---

Hallo,

und da liegt genau das Problem. Mir reichen nicht nur die Koordinaten. Ich brauche von einer Line den Startpunkt als Objekt.

Es handelt sich übrigends immer um einen 3D-Punkt.

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

---

Hallo mgheinz1001,
Du hast aber gesagt, du willst kein neues Objekt, zumindest keinen neuen Punkt erzeugen.
Den Startpunkt einer Linie kannst du so bekommen:
Set hybridShapePointOnCurve1 = hybridShapeFactory1.AddNewPointOnCurveFromPercent(hybridShapeLinePtPt1, 0.000000, False)

Jetzt gibt es den Punkt, aber er taucht nicht auf!    Erst mit:
hybridBody1.AppendHybridShape hybridShapePointOnCurve1

machst du den Punkt sichtbar und klemmst ihn irgendwo in deine Struktur.

Solange das Macro aber läuft, kannst du den Punkt benutzen.
MfG 

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

---

Hallo,

danke für deine Antwort. Aber auf genau diese Vorgehensweise wollte ich eigentlich verzichten. Die Punkte dürfen danach nämlich nicht gelöscht werden, sondern müssen als Referenz bestehen bleiben. Da ich aber eine Vielzahl von Linien auswerten muss, würde der Speicherbedarf so wesentlich ansteigen.

Deshalb wollte ich mir den bereits vorhandenen Ursprungspunkt der Linie als Ojekt zurückgeben lassen ohne irgendwelche neuen Daten hinzuzufügen (s.o.).

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