PureBasic

.............

C'est ça que tu cherches ??

If OpenWindow(0, 100, 200, 195, 260, #PB_Window_SystemMenu, "PureBasic Window")
  Repeat
    Select WindowEvent()
      
      Case #WM_LBUTTONDOWN    : Debug "le bouton gauche est appuyé"
      Case #WM_MBUTTONDOWN    : Debug "le bouton central est appuyé"
      Case #WM_RBUTTONDOWN    : Debug "le bouton droit est appuyé"
      
      Case #WM_LBUTTONUP      : Debug "le bouton gauche est relaché"
      Case #WM_MBUTTONUP      : Debug "le bouton central est relaché"
      Case #WM_RBUTTONUP      : Debug "le bouton droit est relaché"
;       
      Case #PB_Event_CloseWindow : Quit = 1
    EndSelect
  Until Quit = 1
EndIf

Chris

Merci !!

Mais j'ai trouvé plus simple !!

Code : Tout sélectionner

Debug GetKeyState_(#VK_LBUTTON)

(toute les constantes du clavier Marche !! )

Merci quant mem pour ta recherche !! je vais garder ton exemple !!

reedit :: ha bon on peut utiliser les constantes directement ? !!!
coooooool MERCI Chris !!

J'ai pas cherché, c'était sur mon disque

Chris