Hallo Zusammen,
die Aufgabe ist die Hauptrichtungen eines Achsensystem zu bekommen um weitere Elemente in 3D erzugen zu können. Es funktioniert für das Absolute Axis System aber für anderes Achsensystem nicht:
--------------------------------------------------------------------
Dim HSF1 As HybridShapeFactory
Set HSF1 = Part1.HybridShapeFactory
Dim Richtung
Dim oActualAxis As Achsensystem
Set Richtung = HSF1.AddNewDirection(oActualAxis.XAxisDirection)
--------------------------------------------------------------------
Gruss,
K.
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP