| Scrolls the screen such that the coordinates become the center point of the screen. | |
| Syntax: | object.ScrollTo X, Y |
| Parameters: |
X As
long - The horizontal position
to scroll to. This value is in TWIPS.
Y As
long - The vertical position to
scroll to. This value is in TWIPS.
|
| Description: | Note: If there is no horizontal scroll bar
the X value is ignored. Similarly, if there is no vertical
scroll bar the Y value is ignored. Example: Sub OnMouseUp(x As Long, y As Long, flags As Long) Dim oCimScr As GefScreen Set oCimScr = CimGetScreen oCimScr.Zoom = 200 oCimScr.ScrollTo x, y End Sub |