GefScreen.ZoomToPoint (method)

Zoom to the specified percent focusing on given point
Syntax: object.ZoomToPoint x, y, percentZoom
Parameters:
x As long -
y As long -
percentZoom As long -
Description: Zooms to the specified percent focusing on the given point

Examples

Sub GefScreen_ZoomToPoint()
    
    Dim oCimScr As GefScreen
    Set oCimScr = CimGetScreen
    oCimStr.ZoomToPoint 10,10,75
    
End Sub