Hallo Programmierer,
ich habe eine Part-Datei mit einer Schnittkurve, gebildet mit Hilfe von 2 sich schneidenden Flächen. Nun möchte ich die Koordinatenpunkte der Schnittkurve in eine Tabelle mit X-,Y- und Z-Werten schreiben. Ich verwende dazu folgenden Befehl:
Call objEdge.GetPointAtParam(NumParams:=2, Points:=dblPoints, Params:=dblParams)
Das gelingt sehr gut, nur habe ich nicht verstanden, was die 2 Werte dblParams in der Berechnung des Punktes genau bewirken / steuern. Weiss jemand was da genau geschieht?
folgendes Codesegment funktioniert, indem die 2 Werte für dblParams variert werden.
...
objConstructions = objPartDoc.Constructions
objIntersectionCurves = objConstructions.IntersectionCurves
objIntersectionCurve = objIntersectionCurves.Item(1)
Dim i As Integer = 0
For Each objEdge In objIntersectionCurve.Edges(SolidEdgeGeometry.FeatureTopologyQueryTypeConstants.igQueryAll)
For i = 0 To 1000
dblParams(0) = 0.001 * i
dblParams(1) = 0.001 * i
Call objEdge.GetPointAtParam(NumParams:=2, Points:=dblPoints, Params:=dblParams)
sw.WriteLine(dblPoints(0) * 1000 & " " & dblPoints(1) * 1000 & " " & dblPoints(2) * 1000) '& " Params: " & dblParams(0) & " Params: " & dblParams(1))
i = i + 1
Next
Next
...
ergibt zB. folgende Koordinaten:
138.414079559769 0 -0.766805092321639
138.403576951428 2.00163539467593 -0.733566068121219
138.393418512293 4.00324039437802 -0.701416282726489
138.383561260819 6.00481879498026 -0.67021970663152
138.373960588309 8.00637453605698 -0.639835160667407
138.364570250313 10.0079117016426 -0.610116288766795
Gruss Matthias
------------------
SE V20 SP3
SePropManager.NET von
www.leemann-software.net
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP