Intercettare il tasto premuto del mouse
Da Gambas-it.org - Wikipedia.
Versione del 22 ago 2012 alle 20:52 di Vuott (Discussione | contributi)
Per sapere quale tasto del mouse è stato premuto, possiamo farlo intercettando il numero identificativo ottenuto dallo stato del mouse.
Lo stato del mouse viene comunicato dalla proprietà Button di Mouse.
In particolare:
Mouse.Button.Left = 1
Mouse.Button.Middle = 4
Mouse.Button.Right = 2
Esempio:
Public Sub Form_MouseDown() Select Case Mouse.Button Case 1 Print "E' stato premuto il tasto \"Sinistro\" !" Case 2 Print "E' stato premuto il tasto \"Destro\" !" Case 4 Print "E' stato premuto il tasto \"Centrale\" (o la rotellina) !" End Select End
oppure intercettando il valore booleano True delle tre proprietà:
Mouse.Left
Mouse.Middle
Mouse.Right
Public Sub Form_MouseDown() With Mouse If .Left Then Print "Sinistro" If .Middle Then Print "Centrale" If .Right Then Print "Destro" End With End