Object Model Reference : Classes : D : Document : Properties : Document.DrawingOriginX
|
|
| Object Model Reference : Classes : D : Document : Properties : Document.DrawingOriginX |
Property DrawingOriginX As Double
Member of Document
The DrawingOriginX property returns or specifies the horizontal drawing origin for the center of coordinates for the document relative to the center of the page. By default, the center of coordinates is set to the lower-left corner of a page.
The following VBA example moves the center of coordinates to the center of the page and creates a rectangle at this new center of coordinates. The center of coordinates is then moved back to the lower-left corner of the page, and an ellipse is created at this modified center of coordinates.
Sub Test() |
Dim d As Document |
Set d = ActiveDocument |
d.DrawingOriginX = 0 |
d.DrawingOriginY = 0 |
ActiveLayer.CreateRectangle 0, 0, 1, 1 |
d.DrawingOriginX = -d.ActivePage.SizeWidth / 2 |
d.DrawingOriginY = -d.ActivePage.SizeHeight / 2 |
ActiveLayer.CreateEllipse 0, 0, 1, 1 |
End Sub |
|
|
|
|
Copyright 2013 Corel Corporation. All rights reserved.