Diese Routine muss aufgerufen werden wenn man die Resize-Funktionalität vom Control entfernen möchte.
[Visual Basic]
Public Sub Finish()
[Visual Basic] Public Sub Finish()
RemoveHandler mOwnerForm.Paint, AddressOf Paint
RemoveHandler mControl.MouseDown, AddressOf ControlMouseDown
RemoveHandler mControl.MouseMove, AddressOf ControlMouseMove
RemoveHandler mControl.MouseUp, AddressOf ControlMouseUp
For i As Integer = 0 To GrabRects.Length - 1
RemoveHandler GrabRects(i).Paint, AddressOf GrabRectPaint
RemoveHandler GrabRects(i).MouseClick, AddressOf GrabRectMouseClick
RemoveHandler GrabRects(i).MouseMove, AddressOf GrabRectMouseMove
RemoveHandler GrabRects(i).MouseDown, AddressOf GrabRectMouseDown
RemoveHandler GrabRects(i).MouseUp, AddressOf GrabRectMouseUp
RemoveHandler GrabRects(i).Move, AddressOf GrabRectMove
GrabRects(i).Dispose()
Next
GrabRects = Nothing
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