Article | 41023361 |
Type | HowTo |
Product | Engine |
Version | 4.1.6.1028 |
Date Added | 1/5/2004 |
Submitted by | Takis |
Keywords |
Private Sub VDPro1_ScrollView(dx As Double, dy As Double, Cancel As Integer) VDPro1.ActiveDocument.ActiveLayOut.ViewCenter = Array( _ VDPro1.ActiveDocument.ActiveLayOut.ViewCenter(0) - dx, _ VDPro1.ActiveDocument.ActiveLayOut.ViewCenter(1) + dy, _ VDPro1.ActiveDocument.ActiveLayOut.ViewCenter(2)) VDPro1.Redraw Cancel = 1 End Sub