60001924 Export GetTriangles and MergeTriangles methods in Wrapper

Article 60001924
Type Wish
Product Engine
Date Added 3/5/2013 12:00:00 AM
Fixed (3/6/2013 12:00:00 AM)
Submitted by Arnold Akershoek

Summary

Is it possible to export the GetTriangles and MergeTriangles methods of vdPolyface in Wrapper ?

Solution

It is added in 6025. You need to have the VectorDraw.Geometry.TLB and VectorDraw.Professional.TLB in your project references. In VB6 you can use it like :

VDraw.ActiveDocument.New
VDraw.EnableAutoGripOn = True

VDraw.CommandAction.CmdBox3d Array(0, 0, 0), 2, 3, 4, 0
Dim box As VDrawI5.vdPolyface
Set box = VDraw.ActiveDocument.Entities.Last
Dim box6 As VectorDraw_Professional.vdPolyface
Set box6 = box.WrapperObject


VDraw.CommandAction.CmdBox3d Array(5, 0, 0), 2, 3, 4, 0
Dim polyf As VDrawI5.vdPolyface
Set polyf = VDraw.ActiveDocument.Entities.Last
Dim polyf6 As VectorDraw_Professional.vdPolyface
Set polyf6 = polyf.WrapperObject

polyf6.MergeTriangles box6.GetTriangles
polyf.PenColor = "(255,0,0)"
polyf.Update
box.Deleted = True
VDraw.CommandAction.Zoom "E", 0, 0

Send comments on this topic.