è necessario attivare un Hook di sistema... che potrebbe rendere instabile il tuo programma provocando anche dei crash dell'IDE in caso di errore....
oppure utilizzare un mio OCX
si chiama WheelCatcher
una volta registrato nella lista dei componenti di VB lo trovi come Mouse Wheel Catcher
per usarlo lo metti sul form in cui vuoi intercettare il movimento della rotella del mouse.
il componente rilascia un evento, al movimento della rotella:
Rotation assume valore 1 e -1 a seconda che la rotella vada su o giù, segnala quindi il verso di rotazione.codice:Private Sub WheelCatcher1_WheelRotation(Rotation As Long, X As Long, Y As Long, CtrlHwnd As Long) End Sub
X e Y sono le coordinate del mouse in cui la rotella viene mossa.
CtrlHwnd è l'Handle del controllo su cui la rotella viene azionata.
se quindi vuoi muovere la scrollbar del form non devi fare altro che incrementare o decrementare il Value della scrollbarr, a seconda del valore di Rotation, e se l'hWnd rilevato in CtrlHwnd è uguale a TuoForm.hWnd
tutto qui
se dovessi avere problemi, chiedi pure...
Boolean


Boolean
