[Visual Basic] Private Sub ControlMouseDown( _
ByVal sender As Object, _
ByVal e As MouseEventArgs _
)
[Visual Basic] Private Sub ControlMouseDown(ByVal sender As Object, ByVal e As MouseEventArgs)
MoveControl = True
LastMousePos = New Point(e.X, e.Y)
For i As Integer = 0 To GrabRects.Length - 1
GrabRects(i).Visible = False
Next
mOwnerForm.Refresh()
End Sub
Plattformen: Windows 98, Windows 2000 SP4, Windows Millennium Edition, Windows Server 2003, Windows XP Media Center Edition, Windows XP Professional x64 Edition, Windows XP SP2, Windows XP Starter Edition