Bug avec ce code-ci, une fois lancer et terminer ça ne s’arrête plus !
Je veux dire par la que même une fois le programme PB terminer et plus actif, ça continue quand même à l'infini !!!
Ont se retrouve donc avec une souris qui clique sans arrêt !
Ce bug est dû à la version 5.40.
Code : Tout sélectionner
InitMouse ()
;ceci simule un appuis sur une touche de la souris ! ²
If OpenWindow (1, 300, 300, 300, 200, "Fenêtre 1" , #PB_Window_SystemMenu , 0)
EndIf
Delay(5000)
Repeat
event = WindowEvent()
Select event
Case #WM_XBUTTONUP
End
EndSelect
; ****************** ceci Simule l'appuis sur le bouton droit de la souris ******************
; et donc , affiche le menu contextuel forcement !!!!!
mouse_event_ ( #MOUSEEVENTF_LEFTDOWN ,xm,ym,0,1) ; appuis
Delay (100)
mouse_event_ ( #MOUSEEVENTF_LEFTUP ,xm,ym,0,1) ;relache
Delay (100)
; ********************************************************************************
a+1
if a = 10
end
endif
ForEver
End