[R] Arrêter un boucle avec une touche

[Jiloin]

Bonjour,

je viens tout juste de découvrir AutoIt, c'est plutôt sympas, j'ai réussi à faire ma boucle, mais par contre pour l'arrêter c'est pas la même ^^
Je vous met ci-dessous le code que j'ai réussi à obtenir :

Code : Tout sélectionner

sleep(5000)
While 1
    MouseClick("right")
    Send("5868")
    sleep(500)
    If HotKeySet("{ESCAPE}") Then ExitLoop
WEnd

En gros, j'ai beau appuyer sur echap, je reste dans ma boucle et je suis obligé de revenir sur le programme et de l'arrêter par les options, ça écrit des 5868 partout dans mon code, c'est pas la joie ^^

Merci

[timmalos]

L'exemple d'AutoIt sur la fonction HotKeySet est on ne peut plus clair.
Il vous suffit de lire la documentation.

[Jiloin]

Je l'ai lu et relu, je suis allé voir des forums avec différentes utilisations de HotKeySet, j'ai parcouru toutes les réponses que j'ai pu trouver, et je n'ai toujours pas trouvé la réponse à mon problème :s
Lorsque je crée une fonction que j'appel avec HotKeySet, si elle est dans ma boucle, la fin de la fonction supprime la fin de la boucle et crée une erreur, et en dehors, il m'indique une erreur car ExitLoop est en dehors de la boucle, du coup je ne comprends toujours pas comment faire ^^

En tous cas, merci d'avoir répondu

[timmalos]

Code : Tout sélectionner

HotKeySet("{ESCAPE}","quitter")
sleep(5000)
While 1
    MouseClick("right")
    Send("5868")
    sleep(500)
WEnd

Func quitter()
   exit
EndFunc
 

[mikell]

► Afficher le texte

Code : Tout sélectionner

HotKeySet("{ESC}", "Terminate")

Global $cassetoi = 0

GuiCreate("gui")
GuiSetState()

While 1
    Sleep(10)
    If $cassetoi = 1 Then ExitLoop
WEnd
Msgbox(0,"", "et ouala")

Func Terminate()
    $cassetoi = 1
EndFunc
 

edit : grillé par tim

edit2 : mon exemple est plus compréhensible

[Jiloin]

Merci timmalos et ok mikell, bye

[Tlem]

N'oubliez pas la balise [R] dans le titre de votre premier message si votre sujet est résolu.