www.MegaLab.it

da **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

da **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
Silver Black Please HELP ME!

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.

da **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
Silver Black Please HELP ME!

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

da **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!

da **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]