Object Model Reference : Classes : S : SegmentRange : Properties : SegmentRange.NodeRange |
Property NodeRange As NodeRange
Member of SegmentRange
The NodeRange property returns a node range (or NodeRange object) containing all nodes that end segments in the active segment-range object.
The NodeRange property returns a read-only value.
The following VBA example converts all line segments to curves and changes the type of all segment-ending nodes to smooth.
Sub Test() |
Dim sgr As New SegmentRange |
Dim seg As Segment |
For Each seg In ActiveShape.Curve.Segments |
If seg.Type = cdrLineSegment Then sgr.Add seg |
Next seg |
sgr.SetType cdrCurveSegment |
sgr.NodeRange.SetType cdrSmoothNode |
End Sub |
Copyright 2013 Corel Corporation. All rights reserved.