Zdarzenie MouseMove

Zdarzenie MouseMove jest generowane w trakcie przesuwania myszy.

Składnia:

Private Sub Form_MouseMove (Klawisz As Integer, Stan As Integer, X As Single, Y As Single)
Private Sub MDIForm_MouseMove (Klawisz As Integer, Stan As Integer, X As Single, Y As Single)
Private Sub obiekt_MouseMove ([Indeks As Integer,] Klawisz As Integer, Stan As Integer, X As Single, Y As Single)

Składnia zdarzeń MouseMove składa się z następujących części:

obiekt	obiekt, który wykorzystuje zdarzenie MouseMove, dostępny na liście
Indeks	Argument określający element sterujący w tablicy elementów sterujących.
Klawisz	Argument określający, który klawisz został naciśnięty (MouseMove) lub zwolniony (). Argument Klawisz jest polem bitowym, z bitami odpowiednio: lewy przycisk myszy (bit 0), prawy przycisk myszy (bit 1) i śrdokowy przycisk myszy (bit 2). Bitom tym odpowiają następujące wartości 1, 2 i 4. Może być ustawiony tylko jeden z nich i będzie on określał, który przycisk został przyciśnięty, bądź zwolniony.
Stan	Argument określający stan klawiszy Shift, Ctrl i Alt. w czasie wystąpienia zdarzenia. Argument Stan jest polem bitowym, z najmniej znaczącymi bitami odpowiednio: klawisz SHIFT (bit 0), klawisz CTRL (bit 1), i klawisz ALT (bit 2). Bitom tym odpowiają następujące wartości 1, 2 i 4. Mogą być ustawione wszystkie, kilka albo żaden i będzie to znaczyło, że wszystkie lub kilka klawiszy zostało wciśniętych, albo żaden z przycisków nie został wciśnięty. Na przykład, po wciśnięciu CTRL i ALT wartość argumentu Stan będzie wynosiła 6.
X, Y	Argumenty określające aktualne współrzędne kursora myszy w jednostkach danego obiektu (określonych przez właściwości ScaleHeight, ScaleWidth, ScaleLeft i ScaleTop obiektu).

Zdarzenie MouseMove jest generowane ciągle dopóki wskaźnik myszy jest w ruchu na danym obiekcie. Chyba że inny obiekt przejmie mysz, i rozpozna zdarzenie MouseMove wewnątrz swojego obszaru.

Ustawienia dla argumentów Klawisz i Stan:

Stała (Klawisz)	Wartość	Opis
vbLeftButton	1	przyciśnięty lewy klawisz myszy
vbRightButton	2	przyciśnięty prawy klawisz myszy
vbMiddleButton	4	przyciśnięty środkowy klawisz myszy

Stała (Stan)	Wartość	Opis
vbShiftMask	1	wybrany klawisz SHIFT
vbCtrlMask	2	wybrany klawisz CTRL
vbAltMask	4	wybrany klawisz ALT

Można używać procedury zdarzenia MouseMove w odpowiedzi na zdarzenie wywołane przesuwaniem myszy.
Stałych, które spełniają role bitów maskujących, można używać do sprawdzenia każdej kombinacji przycisków bez sprawdzania każdej wartości bitu dla każdej kombinacji.
Należy sprawdzać warunek, najpierw przez przypisanie każdego wyniku do tymczasowej zmiennej i późniejszego porównania argumentów Stan i Klawisz do bitów maskujących. Można użyć operatora And z każdym argumentem do sprawdzenia czy warunek jest większy od zera i sprawdzenia czy klawisz lub przycisk jest naciśnięty, na przykład:

LeftDown=(Klawisz And vbLeftButton)>0
CrtlDown=(Stan And vbCtrlMask)>0

Później w procedurze, można sprawdzić każdą kombinację warunków, jak np.:

If LeftDown And CtrlDown Then

Można używać procedur zdarzeń MouseDown i MouseUp żeby odpowiadać na zdarzenia wywołane przez przyciskanie i zwalnianie przycisków myszy.

Argument Klawisz dla MouseMove różni się od argumentu Klawisz dla zdarzeń MouseDown i MouseUp. Dla zdarzenia MouseMove, argument Klawisz określa aktualny stan wszystkich przycisków. Pojedyncze zdarzenie MouseMove może wskazywać, że kilka lub wszystkie przyciski zostały wciśnięte, albo że żaden nie został przyciśnięty. Dla zdarzeń MouseDown i MouseUp, argument Klawisz wskazuje dokładnie jeden przycisk w zdarzeniu.

Za każdym razem kiedy przesuwane jest okienko w zdarzeniu MouseMove, to może to wywołać zdarzenie kaskadowe. Zdarzenia MouseMove są generowane kiedy okienko przesuwa się pod wskaźnikiem myszy. Zdarzenie MouseMove może być wygenerowane nawet jeżeli myszka jest praktycznie nieruchoma.

Lista obiektów wykorzystujących zdarzenie MouseMove:
Animation
CheckBox
CommandButton
Data
DBCombo
DBGrid
DBList
DirListBox
DriveListBox
FileListBox
Form
Frame
Image
Label
ListBox
OLEContainer
OptionButton
PictureBox
ProgressBar
PropertyPage
Slider
SSTab
StatusBar
TabStrip
TextBox
ToolBar
UpDown
UserControl
UserDocument

na górę strony...