Community
Hi,
I try the create a WorkPointProxy from the center of an arc and use this proxy to add a constraint with an other part.
But I don't know how to create the WorkPointProxy.
Dim app As Inventor.Application = GetObject(, "Inventor.Application") Dim doc As Inventor.AssemblyDocument = app.ActiveDocument Dim occ As Inventor.ComponentOccurrence = doc.ComponentDefinition.Occurrences(1) Dim body As Inventor.SurfaceBody = occ.SurfaceBodies(1) Dim edge As Inventor.Edge = body.Edges(47) Dim pt As Inventor.Point = CType(edge.Geometry, Object).Center Dim workPointProxy As Inventor.WorkPointProxy = Nothing 'This command doesn't work occ.CreateGeometryProxy(pt, workPointProxy)
Thanks,
Pascal
In others words :
I want to make a constraint on center of an edge.
Thanks,
Pascal