Zoom in Corel 11
it's ok. I use the build in Zoom...
I have get the coordinate from a rectangle in the guides. (Me seem, it is not the middlepoint). I want to set the coordinate in the centrum of the screen and increase the whole page to e.g. 1000%.
The centrum of the rectangle has to be the middle of the screen in the new resolution. Like a Zoom-function.
Is that possible?
Public Sub Zoom()
Dim sh As Shape
Dim xPos As Double, yPos As Double
For Each sh In ActivePage.Shapes
If sh.Type = cdrRectangleShape Then
xPos = sh.PositionX
yPos = sh.PositionY
Last edited by ebu; 02-08-2008 at 15:12.
|Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)|
|Thread Tools||Search this Thread|
|Thread||Thread Starter||Forum||Replies||Last Post|
|Lost toolbar zoom tools when opening zoom||justsmilin||General||3||02-05-2007 10:44|
|bug? on Zoom F3||wOxxOm||General||1||31-01-2006 12:59|