[..] Boucle et bouton

[Impecitron]

Bonjour, bonsoir, j'ai fais un script, avec GUI, et enfait, le souci, c'est que je veux créer une boucle quand on appuie sur un bouton, et arrêter la boucle quand on appuie sur le bouton à côté, mais la boucle enpêche d’appuyer sur le bouton ! J'ai plus le code, mais j'aimerai que vous me donniez les astuces, car ça me fait tout le temps ...
Merci,
Impecitron

[orax]

http://autoitscript.fr/forum/viewtopic. ... 582#p93582 (surtout le premier lien pour interrompre une fonction en cours d'exécution)

[walkson]

Bonjour,
Dans votre question, il y a quelque chose de pas logique. En effet, la Gui tourne grâce à une boucle qui attend des messages (clic sur bouton). Si vous lancez une deuxième boucle, c'est pour attendre la réalisation de quelque chose (boucle sur des nombres,lecture array, temps défini etc..) et on sort automatiquement de la boucle quand la demande est fini (exitloop)...
Après, pour satisfaire votre demande, il existe plusieurs méthodes. Je vous en propose une mais que je trouve "horrible". Mais ne sachant pas la finalité et en espérant vous avoir compris...

► Afficher le texte

Code : Tout sélectionner

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Global $Form1 = GUICreate("Form1", 470, 125, 192, 124)
Global $Button1 = GUICtrlCreateButton("marche", 86, 16, 129, 33)
Global $Button2 = GUICtrlCreateButton("arret", 254, 16, 129, 33)
GUISetState(@SW_SHOW)

While 1
 $nMsg = GUIGetMsg()
 Switch $nMsg
  Case $GUI_EVENT_CLOSE
   Exit

     Case $Button1
         MsgBox(0,"","Marche",2)
         While 1
             $nMsg = GUIGetMsg()
             If $nMsg = $Button2 Then ExitLoop
             Sleep(100)
         WEnd
            ContinueCase
     Case $Button2
         MsgBox(0,"","Arret",2)
 EndSwitch
WEnd