Page 2 sur 2
Re: [OK] BindGadgetEvent pour la même proce sur N gadgets ?
Publié : jeu. 24/déc./2015 1:35
par Ar-S
C'est ce que je supposais, merci pour la confirmation.
Re: [OK] BindGadgetEvent pour la même proce sur N gadgets ?
Publié : mar. 26/janv./2016 13:07
par Ar-S
Je reviens dans ce topic pour vous demander comment gérer la détection de mouvement de souris avec les bindevent
J'ai essayé avec #PB_EventType_MouseMove mais ça ne le fait pas.
Code : Tout sélectionner
Enumeration
#win
EndEnumeration
Global.i Mx, My
Declare Fermer()
Declare CheckMouse()
Procedure Fermer()
quite = 1
End
EndProcedure
Procedure CheckMouse()
If EventType() = #PB_EventType_MouseMove
Mx = DesktopMouseX()
My = DesktopMouseY()
Debug mx
EndIf
EndProcedure
InitMouse()
If OpenWindow(#win, 60, 200, largeur_fenetre, 100, "mouse test", #PB_Window_SystemMenu)
BindEvent(#PB_EventType_MouseMove,@CheckMouse() )
BindEvent(#PB_Event_CloseWindow,@Fermer())
Repeat
Event = WaitWindowEvent(20)
Until quite = 1
EndIf
Re: [OK] BindGadgetEvent pour la même proce sur N gadgets ?
Publié : mar. 26/janv./2016 13:52
par Marc56
BindEvent ne gère que les évènements de WindowEvent() donc pas #PB_EventType_MouseMove
Dixit l'aide sur BindEvent:
Pour une liste complète des évènements, consultez WindowEvent().
Re: [OK] BindGadgetEvent pour la même proce sur N gadgets ?
Publié : mar. 26/janv./2016 15:11
par Ar-S
C'est bien dommage.
J'ai compensé avec un timer. Merci
Re: [OK] BindGadgetEvent pour la même proce sur N gadgets ?
Publié : mar. 26/janv./2016 15:49
par Marc56
Tu peux sans problème mélanger méthode classique et méthode BindEvent et de même injecter un Event avec PostEvent (pas testé)
BindEvent a aussi ses inconvénients.