rotellina del mouse

[fsurfing]

come si fa a sapere se la rotellina viene mossa in un verso od in un altro?

[giulio]

Codice: [Seleziona]

PUBLIC SUB Form_MouseWheel()
  
  
  SELECT CASE Mouse.delta
    
    CASE 1 
      PRINT "rotellina verso l'alto"
    CASE -1 
      PRINT "rotellina verso il basso"
  
  END SELECT   

END

ciao

[fsurfing]

wow !!!!!!!   ma giulio tu chi sei? il fratello gemello di benoìt :cappello:

grazie mille!

[giulio]

Sì, magari. Credo di avere il 5% del Q.I. di Benoit. Dopo alcuni anni che uso Gambas ho capito una cosa: se una funzione non è implementata si può creare con del codice (recentemente abbiamo parlato di come centrare gli header nella GridView). Ma quasi sempre c'è. Nel caso che hai proposto tu, ho agito così sperando di trovare qualcosa: ricerca su google --> "mouse wheel up down under X". Varie risposte, tra le quali un altro linguaggio di programmazione che citava la proprietà Delta:

http://drawlogic.com/2007/05/13/mousewheel-event-in-as3/

Ho guardato sotto le proprietà della classe Mouse di Gambas e la proprietà Delta era lì.

Ciao.