Shape.CreateArrowHead

Function CreateArrowHead() As ArrowHead

Member of Shape

The CreateArrowhead method creates an arrowhead from the specified shape. The shape must be of a type that can be converted to a curve.

The following code example creates an arrowhead from a six-sided star polygon and applies it to a line:

Sub Test() 
 Dim s As Shape, ar As ArrowHead 
 Set s = ActiveLayer.CreatePolygon(0, 0, 2, 2, 6, , , True) 
 Set ar = s.CreateArrowHead() 
 s.Delete 
 Set s = ActiveLayer.CreateLineSegment(0, 0, 5, 5) 
 s.Outline.Width = 0.1 
 s.Outline.EndArrow = ar 
End Sub