Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations cowski on being selected by the Eng-Tips community for having the most helpful posts in the forums last week. Way to Go!

Vertex

Status
Not open for further replies.

theing

New member
Joined
Mar 5, 2014
Messages
18
Location
MX
good afternoon

i just want to know if a can get the coordinates of a vertex (no points) and if the GetCoordinates will also work

Thank you for your answer
 
i exctract all the surfaces of a body, and i pick a random surface to get the vertex and, i am trying to get the coordinates of each vertex, the code i am using is the following

hope you can help me with this

Language="VBSCRIPT"

Sub CATMain()

Dim mycoord(2)

Set partDocument1 = CATIA.ActiveDocument
Set selection1 = partDocument1.Selection

selection1.Search "Name=Surface.48,all"

Set selection = partDocument1.Selection1
selection.Search "Topology.Vertex,sel"
Y = selection.Count

For i = 1 To Y
Set reference1 = Selection.Item(i).Value
reference1.GetCoordinates (mycoord)
xc = mycoord(0)
yc = mycoord(1)
zc = mycoord(2)

MsgBox xc
MsgBox yc
MsgBox zc
Next

End Sub
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top