SubPath.Segments

Property Segments As Segments

Member of SubPath

The Segments property returns a Segments collection, which contains all of the segments of the subpath.

The Segments property returns a read-only value.

The following code example converts all of the segments in the first subpath to lines:

Sub Test() 
 Dim seg As Segment 
 For Each seg In ActiveShape.Curve.Subpaths(1).Segments 
  seg.Type = cdrLineSegment 
 Next seg 
End Sub 

Copyright 2007 Corel Corporation. All rights reserved.