Object Model Reference : Classes : N : NodeRange : Methods : NodeRange.Stretch |
Sub Stretch([RatioX As Single = 1], [RatioY As Single = 1], [UseAnchorPoint As Boolean = False], [StretchAnchorX As Double], [StretchAnchorY As Double])
Member of NodeRange
The Stretch property stretches the nodes in a node range as though the node range were a separate shape object.
The following VBA example stretches the node range in the active shape with ratio values of 1, no reference point, and an anchor point of (0, 0).
Sub SkewNode() |
Dim nr as NodeRange |
Set nr = ActiveShape.Curve.Nodes.All |
With nr |
.Stretch 1, 1, False, 0, 0 |
End With |
End Sub |
Copyright 2013 Corel Corporation. All rights reserved.