[R] HotKeySet : Empêcher la désactivation d'une touche

[Nicoto]

Bonjour,

Le titre n'est pas très clair, je vais essayer de mieux expliquer ^^. Lorsqu'on utilise HotKeySet et qu'on appuie sur la/les touches choisies, ces dernières ne sont pas "envoyées". Exemple:

Code : Tout sélectionner

HotKeySet("x","MaFonction")
While 1
   Sleep(100)
WEnd
Func MaFonction()
   TrayTip("","Vous avez appuyez sur X",10)
   Exit
EndFunc
 

Si je lance ce script, que j'ouvre Bloc-notes et que j'appuie sur 'x'. MaFonction va s'exécuter MAIS la lettre 'x' ne sera pas écrite dans Bloc-notes. Voilà tout mon problème ! Je voudrais que MaFonction s'exécute et que la lettre soit écrite. Et je ne sais pas comment faire :/.

Pourriez-vous m'aider ?

Merci

[silvere]

Bonjour,
Avec la fonction HotKeySet il est normal que la lettre soit désactiver mais pour réglé ton problème utilise la fonction _Ispressed, regarde dans l'aide pour plus d'info.

[PandiPanda]

Bonjour,
et en passant par un controlSend() ou un send()?

petit script d'exemple;

avec un Send() :

► Afficher le texte

Code : Tout sélectionner

While 1
    Sleep(50)
WEnd

Func maFunc()
    HotKeySet("a")
    Send("a")
    MsgBox(0,"trolol","a envoyé")
    HotKeySet("a","maFunc")
EndFunc

avec un ControlSend() :

► Afficher le texte

Code : Tout sélectionner

HotKeySet("a","maFunc")

While 1
    Sleep(50)
WEnd

Func maFunc()
    ControlSend("","","","a")
    MsgBox(0,"trolol","a envoyé")
EndFunc

[Nicoto]

Merci PandiPanda je ne savais pas qu'on pouvait désactiver un HotKey ^^.
Je vais essayer cela.

[PandiPanda]

j'ai ré editer le message ^^
avec un control, pas besoin de le "désactivé" mais le controlSend() peux parfois poser certains "problème"

[mikell]

Et pourquoi pas un GUISetAccelerators ? (hotkey qui ne fonctionne que si la gui est active)

► Afficher le texte

Code : Tout sélectionner

#include <GUIConstantsEx.au3>

GUICreate("test", 210, 80)
GUICtrlCreateLabel("Please click a button!", 10, 10)
$YesID = GUICtrlCreateButton("Yes", 10, 50, 50, 20)

Dim $AccelKeys[1][2]=[["x", $YesID]]
GUISetAccelerators($AccelKeys)

GUISetState() 

Do
    $msg = GUIGetMsg()
    Select
        Case $msg = $YesID
            MsgBox(0, "You clicked on", "Yes")
    EndSelect
Until $msg = $GUI_EVENT_CLOSE
 

[Nicoto]

Mon problème est résolu. J'ai fait comme PandiPanda pour Send().
Merci !