Punto informatico Network
Login Esegui login | Non sei registrato? Iscriviti ora (è gratuito!)
Username: Password:
  • Annuncio Pubblicitario

[VB] Intercettare la "rotellina" del mouse

Il forum per tutti i developer. Leggere attentamente il regolamento di sezione prima di postare.

[VB] Intercettare la "rotellina" del mouse

Messaggioda DilanDog » ven set 23, 2005 11:27 am

Qualcuno mi suggerisce come fare? Io ho fatto così ma ci dev'essere qualcosa che non va perché quando parte il progetto mi si chiude VB completamente [cry]


lpPrevWndProc = SetWindowLong(Me.hwnd, GWL_WNDPROC, AddressOf WindowProc)

Public Function WindowProc(ByVal hwnd As Long, ByVal uMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long

myform.caption=lparam & " - " & wparam 'Codice per vedere cosa torna dalla funzione

end function



Non ho incluso tutte le varie dichiarazioni API ecc. ecc., comunque sia dichiarazioni che la variabile lpPrevWndProc sono dichiarate come pubbliche in un modulo .bas. Anche la routine WindowProc si trova in quel modulo

Silver Black Please HELP ME! [sbigot]

Thanks
Avatar utente
DilanDog
Senior Member
Senior Member
 
Messaggi: 208
Iscritto il: ven apr 15, 2005 9:13 am
Località: Milano

Re: [VB] Intercettare la "rotellina" del mouse

Messaggioda Silver Black » ven set 23, 2005 2:14 pm

DilanDog ha scritto:Qualcuno mi suggerisce come fare? Io ho fatto così ma ci dev'essere qualcosa che non va perché quando parte il progetto mi si chiude VB completamente [cry] [...]
Silver Black Please HELP ME! [sbigot]


Non è chiaro ciò che vuoi fare. Vuoi gestire la rotellina del mouse DOVE? In che controllo? Textbox? RTF?

VB si chiude perché stai passando un'indirizzo di memoria errato alla
SetWindowsLong

Fammi sapere e sarò felice di aiutarti.
Sergio Pappalardo aka Silver Black
CyberInstaller - www.silvercybertech.com - http://silvercybertech-labs.com/cyberblog
Avatar utente
Silver Black
Silver Member
Silver Member
 
Messaggi: 1147
Iscritto il: gio gen 06, 2005 8:50 pm
Località: Bassano del Grappa (VI)

Re: [VB] Intercettare la "rotellina" del mouse

Messaggioda DilanDog » mar set 27, 2005 4:20 pm

Silver Black ha scritto:
DilanDog ha scritto:Qualcuno mi suggerisce come fare? Io ho fatto così ma ci dev'essere qualcosa che non va perché quando parte il progetto mi si chiude VB completamente [cry] [...]
Silver Black Please HELP ME! [sbigot]


Non è chiaro ciò che vuoi fare. Vuoi gestire la rotellina del mouse DOVE? In che controllo? Textbox? RTF?

VB si chiude perché stai passando un'indirizzo di memoria errato alla
SetWindowsLong

Fammi sapere e sarò felice di aiutarti.


Allora, avrei bisogno di gestire il movimento della rotellina del mouse associata ad un controllo slider, per simulare l'alzamento/abbassamento di volume di un dispositivo audio. L'ideale sarebbe poter avere qualcosa, una routine o un messaggio, che mi indicasse quando questa rotellina viene mossa, in che direzione e di quanto è stata spostata rispetto alla posizione precedente. Mi servirebbe che questo evento fosse disponibile sempre e non solo quando il focus si trova su un determinato controllo, es. sullo slider, perché l'obiettivo è proprio quello di avere un controllo di volume associato a questa rotella indipendentemente da ciò che sta facendo il programma in quel momento. Ovviamente se il programma non è più attivo la funzionalità viene persa.
Spero di aver chiarito un po' di più quello che mi serve....e soprattutto spero che tu possa aiutarmi :-)

Thanks
Avatar utente
DilanDog
Senior Member
Senior Member
 
Messaggi: 208
Iscritto il: ven apr 15, 2005 9:13 am
Località: Milano


Messaggioda Silver Black » mar set 27, 2005 4:40 pm

Ok, sei stato abbastanza chiaro. Allora questo link è quello che fa per te:
http://www.vbaccelerator.com/home/VB/Code/Libraries/Hooks/Middle_Scroller/article.asp

Troverai il codice che ti serve.
Ciao!
Sergio Pappalardo aka Silver Black
CyberInstaller - www.silvercybertech.com - http://silvercybertech-labs.com/cyberblog
Avatar utente
Silver Black
Silver Member
Silver Member
 
Messaggi: 1147
Iscritto il: gio gen 06, 2005 8:50 pm
Località: Bassano del Grappa (VI)

Messaggioda DilanDog » mar ott 04, 2005 2:13 pm

Silver Black ha scritto:Ok, sei stato abbastanza chiaro. Allora questo link è quello che fa per te:
http://www.vbaccelerator.com/home/VB/Code/Libraries/Hooks/Middle_Scroller/article.asp

Troverai il codice che ti serve.
Ciao!


Finalmente sono riuscito a trovare il tempo di provare il codice che mi hai postato, funziona che è una meraviglia!!! [applauso]

Grazie mille [:-D]
Avatar utente
DilanDog
Senior Member
Senior Member
 
Messaggi: 208
Iscritto il: ven apr 15, 2005 9:13 am
Località: Milano

Messaggioda Silver Black » mar ott 04, 2005 2:23 pm

Prego, figurati! [:-D]
Grazie a te per aver fatto sapere a tutti com'è finita la tua storia.
Sergio Pappalardo aka Silver Black
CyberInstaller - www.silvercybertech.com - http://silvercybertech-labs.com/cyberblog
Avatar utente
Silver Black
Silver Member
Silver Member
 
Messaggi: 1147
Iscritto il: gio gen 06, 2005 8:50 pm
Località: Bassano del Grappa (VI)

Messaggioda Robby78 » gio ott 06, 2005 9:28 am

benebene... anche questa potrà tornarmi utile... bella lì [applauso]
Povera patria! Schiacciata dagli abusi del potere di gente infame, che non sa cos'è il pudore - Franco Battiato
ricordati di pensare! - mia mamma
Avatar utente
Robby78
Membro Ufficiale (Gold)
Membro Ufficiale (Gold)
 
Messaggi: 3829
Iscritto il: gio gen 08, 2004 5:25 pm
Località: Emilia Romagna

Messaggioda Robby78 » gio ott 06, 2005 9:34 am

benebene... anche questa potrà tornarmi utile... bella lì [applauso]
Povera patria! Schiacciata dagli abusi del potere di gente infame, che non sa cos'è il pudore - Franco Battiato
ricordati di pensare! - mia mamma
Avatar utente
Robby78
Membro Ufficiale (Gold)
Membro Ufficiale (Gold)
 
Messaggi: 3829
Iscritto il: gio gen 08, 2004 5:25 pm
Località: Emilia Romagna


Torna a Programmazione

Chi c’è in linea

Visitano il forum: Google [Bot] e 1 ospite

Powered by phpBB © 2002, 2005, 2007, 2008 phpBB Group
Traduzione Italiana phpBB.it

megalab.it: testata telematica quotidiana registrata al Tribunale di Cosenza n. 22/09 del 13.08.2009, editore Master New Media S.r.l.; © Copyright 2008 Master New Media S.r.l. a socio unico - P.I. 02947530784. GRUPPO EDIZIONI MASTER Spa Tutti i diritti sono riservati. Per la pubblicità: Master Advertising