Object Model Reference : Classes : N : NodeRange : Properties : NodeRange.PositionX
|
|
| Object Model Reference : Classes : N : NodeRange : Properties : NodeRange.PositionX |
Property PositionX As Double
Member of NodeRange
The PositionX property returns the horizontal position of the bounding box that encloses all nodes in a node range. This position is relative to the document’s reference point and is measured in document units.
• |
The value of PositionX is 0 if there are no nodes in the node range.
|
The PositionX property returns a read-only value.
The following VBA example draws a rectangle around the selected nodes.
Sub Test() |
Dim nr As NodeRange |
Dim x1 As Double, y1 As Double |
Dim x2 As Double, y2 As Double |
Set nr = ActiveShape.Curve.Selection |
ActiveDocument.ReferencePoint = cdrTopLeft |
x1 = nr.PositionX |
y1 = nr.PositionY |
ActiveDocument.ReferencePoint = cdrBottomRight |
x2 = nr.PositionX |
y2 = nr.PositionY |
ActiveLayer.CreateRectangle x1, y1, x2, y2 |
End Sub |
|
|
|
|
Copyright 2013 Corel Corporation. All rights reserved.