PureBasic

Salut,
je ne trouve pas de constante pour la touche Alt Graph (à droite d'espace) ...
Est-ce un oublie ou existe-t'elle ?
A+

#VK_MENU (valeur $12)

Tu la récupère avec EventwParam() et #WM_KEYDOWN

Chris

Tiens, je viens de découvrir qu'il y avait une touche #PB_Shortcut_Menu

C'est peut-être bon, ça!!!

*************** Ajouté*************

Ben voui, c'est bon

Code : Tout sélectionner

Enumeration 
  #Window_0 
EndEnumeration 

If OpenWindow(#Window_0, 216, 150, 363, 217,  #PB_Window_SystemMenu | #PB_Window_SizeGadget | #PB_Window_TitleBar , "New window ( 0 )") 
EndIf 
AddKeyboardShortcut(#Window_0, #PB_Shortcut_Menu,#PB_Shortcut_Menu) 

Repeat 
  Select WaitWindowEvent() 
    Case #PB_EventMenu 
      Select EventMenuID() 
        Case #PB_Shortcut_Menu
          Debug "Alt GR"
      EndSelect 
  EndSelect 
Until Event = #PB_EventCloseWindow 
End

Chris

Merci Chris !
J'aurais jamais pensé que Alt Gr puisse se nomer Menu ...
Par contre cela ne résout pas mon problème car je voulais combiner (comme shift,ctrl ou alt) cette touche avec d'autres ...
A+

LavaLava a écrit :Merci Chris !
J'aurais jamais pensé que Alt Gr puisse se nomer Menu ...
Par contre cela ne résout pas mon problème car je voulais combiner (comme shift,ctrl ou alt) cette touche avec d'autres ...
A+

Et qu'est-ce qui t'empêche de le faire ?

Tout simplement parce que la combinaison de touche :
#Pb_Shortcut_Menu | #Pb_Shortcut_A
ne fonctionne pas ...

Effectivement.

Alors tu devrais peut-être pouvoir t'en sortir avec un code dans ce style.

Code : Tout sélectionner

Enumeration 
  #Window_0 
EndEnumeration 

If OpenWindow(#Window_0, 216, 150, 363, 217,  #PB_Window_SystemMenu | #PB_Window_SizeGadget | #PB_Window_TitleBar , "New window ( 0 )") 
EndIf 
AddKeyboardShortcut(#Window_0, #PB_Shortcut_Menu,#PB_Shortcut_Menu)

Repeat 
  
  ; Exemple pour Alt-Gr + A
  If GetAsyncKeyState_(#VK_RMENU) < 0 And GetAsyncKeyState_($41)
    Debug "Alt-Gr + A"
    ; Tu mets la commande dont tu as besoin ici
  EndIf

  Select WaitWindowEvent()
    Case #PB_EventCloseWindow 
      quit = #True
  EndSelect 
Until quit
End

Grrr...
encore un api ...

mais c'est au moins une solution !
Toujours au top, merci Chris ...

Chris a écrit :Effectivement.

Alors tu devrais peut-être pouvoir t'en sortir avec un code dans ce style.

Code : Tout sélectionner

Enumeration 
  #Window_0 
EndEnumeration 

If OpenWindow(#Window_0, 216, 150, 363, 217,  #PB_Window_SystemMenu | #PB_Window_SizeGadget | #PB_Window_TitleBar , "New window ( 0 )") 
EndIf 
AddKeyboardShortcut(#Window_0, #PB_Shortcut_Menu,#PB_Shortcut_Menu)

Repeat 
  
  ; Exemple pour Alt-Gr + A
  If GetAsyncKeyState_(#VK_RMENU) < 0 And GetAsyncKeyState_($41)
    Debug "Alt-Gr + A"
    ; Tu mets la commande dont tu as besoin ici
  EndIf

  Select WaitWindowEvent()
    Case #PB_EventCloseWindow 
      quit = #True
  EndSelect 
Until quit
End

Pourquoi vous utilisez tous les APIs au lieu des fonctions integrés dans PureBasic ?

Slide a écrit :Pourquoi vous utilisez tous les APIs au lieu des fonctions integrés dans PureBasic?

Tu est sur d'avoir lu tous les post de ce sujet ???

LavaLava a écrit :Merci Chris !
J'aurais jamais pensé que Alt Gr puisse se nomer Menu ...
Par contre cela ne résout pas mon problème car je voulais combiner (comme shift,ctrl ou alt) cette touche avec d'autres ...
A+

Moi a écrit :Et qu'est-ce qui t'empêche de le faire ?

LavaLava a écrit :Tout simplement parce que la combinaison de touche :
#Pb_Shortcut_Menu | #Pb_Shortcut_A
ne fonctionne pas ...

Moi a écrit :Effectivement.

Alors tu devrais peut-être pouvoir t'en sortir avec un code dans ce style.

Ben oui, faut tout lire

‮

Chris a écrit :
Slide a écrit :Pourquoi vous utilisez tous les APIs au lieu ‮des fonctions integrés dans PureBasic?
‮Tu est sur d'avoir lu tous les post de ce sujet ???

‮
LavaLava a écrit :Merci Chris !
‮J'aurais jamais pensé que Alt Gr puisse se nomer Menu ...
‮Par contre cela ne résout pas mon problème car je voulais combiner ‮(comme shift,ctrl ou alt) cette touche avec d'autres ...
‮A+
‮
Moi a écrit :Et qu'est-ce qui t'empêche de le faire ?
‮
LavaLava a écrit :Tout simplement parce que la combinaison de ‮touche :
‮#Pb_Shortcut_Menu | #Pb_Shortcut_A
‮ne fonctionne pas ...

‮
Moi a écrit :Effectivement.

‮Alors tu devrais peut-être pouvoir t'en sortir avec un code dans ce style.‮
‮Ben oui, faut tout lire

PureBasic

AddKeyboardShortcut()

AddKeyboardShortcut()