SPYMouseEvent
Enumerationstyp, der die Mausstatus während eines Maus-Events definiert. Verwenden Sie diese Enumerationswerte als Bitmasken anstatt direkte Vergleiche damit durchzuführen.
spyNoButtonMask | = 0 |
spyMouseMoveMask | = 1 |
spyLeftButtonMask | = 2 |
spyMiddleButtonMask | = 4 |
spyRightButtonMask | = 8 |
spyButtonUpMask | = 16 |
spyButtonDownMask | = 32 |
spyDoubleClickMask | = 64 |
spyShiftKeyDownMask | = 128 |
spyCtrlKeyDownMask | = 256 |
spyLeftButtonDownMask | = 34 // spyLeftButtonMask | spyButtonDownMask |
spyMiddleButtonDownMask | = 36 // spyMiddleButtonMask | spyButtonDownMask |
spyRightButtonDownMask | = 40 // spyRightButtonMask | spyButtonDownMask |
spyLeftButtonUpMask | = 18 // spyLeftButtonMask | spyButtonUpMask |
spyMiddleButtonUpMask | = 20 // spyMiddleButtonMask | spyButtonUpMask |
spyRightButtonUpMask | = 24 // spyRightButtonMask | spyButtonUpMask |
spyLeftDoubleClickMask | = 66 // spyRightButtonMask | spyButtonUpMask |
spyMiddleDoubleClickMask | = 68 // spyMiddleButtonMask | spyDoubleClickMask |
spyRightDoubleClickMask | = 72 // spyRightButtonMask | spyDoubleClickMask |
Beispiele
' to check for ctrl-leftbutton-down in VB
If (i_eMouseEvent = (XMLSpyLib.spyLeftButtonDownMask Or XMLSpyLib.spyCtrlKeyDownMask)) Then
' react on ctrl-leftbutton-down
End If
' to check for double-click with any button in VBScript
If (((i_eMouseEvent And spyDoubleClickMask) <> 0) Then
' react on double-click
End If