Zdarzenie MouseDown, MouseUp
Zdarzenia MouseDown i MouseUp są generowane po naciśnięciu i po zwolnieniu klawisza myszy.
Składnia:
Private Sub Form_MouseDown (Klawisz As Integer, Stan As Integer, X As Single, Y As Single)
Private Sub MDIForm_MouseDown (Klawisz As Integer, Stan As Integer, X As Single, Y As Single)
Private Sub obiekt_MouseDown ([Indeks As Integer,] Klawisz As Integer, Stan As Integer, X As Single, Y As Single)
Private Sub Form_MouseUp (Klawisz As Integer, Stan As Integer, X As Single, Y As Single)
Private Sub MDIForm_MouseUp (Klawisz As Integer, Stan As Integer, X As Single, Y As Single)
Private Sub obiekt_MouseUp ([Indeks As Integer,] Klawisz As Integer, Stan As Integer, X As Single, Y As Single)
Składnia zdarzeń MouseDown, MouseUp składa się z następujących części:
| obiekt |
obiekt, który wykorzystuje zdarzenie MouseDown, MouseUp, 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 (MouseDown) lub zwolniony (MouseUp). 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).
|
Procedury zdarzeń MouseDown i MouseUp używane są do określenia działań jakie mają wystąpić, gdy dany przycisk myszy zostanie wciśnięty lub zwolniony. W przeciwieństwie do zdarzeń Click i DblClick, zdarzenia MouseDown i MouseUp potrafią rozróżnić czy lewy, środkowy czy prawy przycisk myszy został naciśnięty (bądź zwolniony). Można także napisać kod kombinacji klawiszy mysz-klawiatura, z użyciem klawiszy klawiszy SHIFT, CTRL i ALT.
Zastosowania dla zdarzeń Click i DblClick:
- jeżeli klawisz myszy został przyciśnięty, kiedy wskaźnik myszy jest nad formą lub kontrolką, wóczas obiekt odbierze wszystkie zdarzenia myszy, kończąc na MouseUp. Z tego może wynikać, że współrzędne wskaźnika myszy zwrócone przez zdarzenie, mogą nie zawsze znajdować się wewnątrz obszaru obiektu, który je odbierze,
- jeżeli zostało przyciśniętych kilka klawiszy myszy naraz (albo seria naciśnięć), wówczas obiekt, który odebrał pierwsze przyciśnięcie klawisza, odbierze wszystkie zdarzenia myszy, dopóki wszystkie klawisze nie zostaną zwolnione.
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. Argument Klawisz dla zdarzeń MouseDown i MouseUp różni sie od argumentu Klawisz używanego do zdarzenia MouseMove. Dla MouseDown i MouseUp, argument Klawisz wskazuje dokładnie jeden klawisz na zdarzenie, podczas gdy dla MouseMove wskazuje aktualny stan wszystkich klawiszy.
Lista obiektów wykorzystujących zdarzenie MouseDown, MouseUp:
Animation
CheckBox
CommandButton
Data
DBCombo
DBGrid
DBList
DirListBox
DriveListBox
FileListBox
Form
Frame
Image
Label
ListBox
OLEContainer
OptionButton
PictureBox
ProgressBar
PropertyPage
Slider
SSTab
TabStrip
TextBox
ToolBar
UpDown
UserControl
UserDocument
|
