GUISetOnEvent, force loop to stop?

[huldu]

Is there any way, in a gui, to force a loop to stop?

#include <GUIConstants.au3>

Opt("GUIOnEventMode",1)

$Form1 = GUICreate("Testing", 100, 100, 100, 100) 
GUISetOnEvent($GUI_EVENT_CLOSE, "ExitNow")

$Button1 = GUICtrlCreateButton("Start", 25, 25, 50, 50)
GUICtrlSetOnEvent($Button1, "Start")

GUISetState(@SW_SHOW)

While 1

WEnd

Func Start()
    GUICtrlSetData($Button1, "Stop")
    GUICtrlSetOnEvent($Button1, "Stop")
    ToolTip("In start function.",0,0)
EndFunc

Func Stop()
    GUICtrlSetData($Button1, "Start")
    GUICtrlSetOnEvent($Button1, "Start")
    ToolTip("In stop function.",0,0)
EndFunc

Func ExitNow()
    Exit
EndFunc

The above works fine, when you click on start the stuff start, if you click on stop it stops. However lets say you have a while loop inside the function... There is no way to exit the loop, it seems to get stuck in it and ignore the GUICtrlSetOnEvent actions. Is there any way to FORCE the GUICtrlSetOnEvent to _always_ be checked, even if in a loop?

[Faustvii]

you could make a hotkey to exit loop

[huldu]

you could make a hotkey to exit loop

Ive tried that, the problem is it wont exit the loop instantly. It will finish the loop before it accepts the hotkey.

[jaenster]

on hotkey exit loop ?

[huldu]

on hotkey exit loop ?

The problem is the hotkey only accept a keyboard press. I want the button to stop the loop, not the keyboard.

[jaenster]

Thats not hard , please a second , Then i make it

[jaenster]

#include <GUIConstants.au3>

Opt("GUIOnEventMode",1)

$Form1 = GUICreate("Testing", 100, 100, 100, 100) 
GUISetOnEvent($GUI_EVENT_CLOSE, "ExitNow")

$Button1 = GUICtrlCreateButton("Start", 25, 25, 50, 50)
GUICtrlSetOnEvent($Button1, "Start")

GUISetState(@SW_SHOW)

While 1

WEnd

Func Start()
    GUICtrlSetData($Button1, "Stop")
    GUICtrlSetOnEvent($Button1, "Stop")
    ToolTip("In start function.",0,0)
EndFunc

Func Stop()
    GUICtrlSetData($Button1, "Start")
    GUICtrlSetOnEvent($Button1, "Start")
    ToolTip("In stop function.",0,0)
EndFunc

Func ExitNow()
    Exit
EndFunc

Something like this ?

[huldu]

That was a copy of what i already wrote.

I need help to stop this, below. Once the loop has started i cant stop it using the button, which is what im looking for. A way to stop the loop using the button, not a hotkey.

#include <GUIConstants.au3>

Opt("GUIOnEventMode",1)

$Form1 = GUICreate("Testing", 100, 100, 100, 100)
GUISetOnEvent($GUI_EVENT_CLOSE, "ExitNow")

$Button1 = GUICtrlCreateButton("Start", 25, 25, 50, 50)
GUICtrlSetOnEvent($Button1, "Start")

GUISetState(@SW_SHOW)

While 1

WEnd

Func Start()
    While 1
    GUICtrlSetData($Button1, "Stop")
    GUICtrlSetOnEvent($Button1, "Stop")
    ToolTip("In start function.",0,0)
    WEnd
EndFunc

Func Stop()
    GUICtrlSetData($Button1, "Start")
    GUICtrlSetOnEvent($Button1, "Start")
    ToolTip("In stop function.",0,0)
EndFunc

Func ExitNow()
    Exit
EndFunc

[jaenster]

huh wtf i dont add the good thing , sorry ... i copy it from you and edit it ... omg

#include <GUIConstants.au3>

Opt("GUIOnEventMode",1)

$Form1 = GUICreate("Testing", 100, 100, 100, 100) 
GUISetOnEvent($GUI_EVENT_CLOSE, "ExitNow")

$Button1 = GUICtrlCreateButton("Start", 25, 25, 50, 50)
GUICtrlSetOnEvent($Button1, "Start")

GUISetState(@SW_SHOW)

While 1
$msg = GUIGetMsg()
if $msg = $button1 Then
    exitloop
endif
WEnd

Func Start()
    GUICtrlSetData($Button1, "Stop")
    GUICtrlSetOnEvent($Button1, "Stop")
    ToolTip("In start function.",0,0)
EndFunc

Func Stop()
    GUICtrlSetData($Button1, "Start")
    GUICtrlSetOnEvent($Button1, "Start")
    ToolTip("In stop function.",0,0)
EndFunc

Func ExitNow()
    Exit
EndFunc

[huldu]

The above still doesnt work... And it wont ever work because the loop is after the main loop. So when you are in the second loop, the stuff in the main loop is ignored because its not running.

Ran into this problem several times tho. Still havent found a solution. The only bandaid i could get work was to run a second application, but this isnt leading anywhere because im forced to run a third and fourth and so on until i can figure out how to fix this.

Btw, just add a while loop in the Start() function and you see what i mean.'

I think alot of this is because of a Sleep() inside the loop, but i still dont understand why GUISetOnEvent isnt responding when it should be doing it(?).

Edited February 8, 2006 by huldu

[Faustvii]

#include <GUIConstants.au3>

Opt("GUIOnEventMode",1)

$Form1 = GUICreate("Testing", 100, 100, 100, 100)
GUISetOnEvent($GUI_EVENT_CLOSE, "ExitNow")

$Button1 = GUICtrlCreateButton("Start", 25, 25, 50, 50)
GUICtrlSetOnEvent($Button1, "Start")

GUISetState(@SW_SHOW)

While 1

WEnd

Func Start()
    While 1
    GUICtrlSetData($Button1, "Stop")
    GUICtrlSetOnEvent($Button1, "Stop")
    ToolTip("In start function.",0,0)
    Exitloop
    WEnd
EndFunc

Func Stop()
    GUICtrlSetData($Button1, "Start")
    GUICtrlSetOnEvent($Button1, "Start")
    ToolTip("In stop function.",0,0)
EndFunc

Func ExitNow()
    Exit
EndFunc

Does this work?

Edited February 8, 2006 by Liope

[huldu]

Hehe, the problem above is that if i use exitloop in the end of the loop, whats the point of the loop in the first place

The loop is there to repeat events, until stop button is being pressed.

[Faustvii]

that works the way i tested it it changes the button to stop and start..

[Faustvii]

Hehe, the problem above is that if i use exitloop in the end of the loop, whats the point of the loop in the first place

The loop is there to repeat events, until stop button is being pressed.

ahh..

[cdkid]

havent read all of this thread but what about something like

$blah = GuiCreate("")
$button = GuiCtrlCreateButon("moo",-1,-1)
GuiSetState()
While 1
$msg = GuiGetMsg()
select
case $msg= $button
exitloop
endselect
WEnd

--dont know if thsi will help or not

~cdkid

Edited February 8, 2006 by cdkid

[huldu]

The problem is while in a loop (after the main program loop), events for some reason get ignored. If the events still worked i would be out of the loop in no-time.

The above doesnt help with the problem however.

[Faustvii]

i cant help here i just cant see how to fix this..

[pecloe]

#include <GUIConstants.au3>

Opt("GUIOnEventMode",1)

$Form1 = GUICreate("Testing", 100, 100, 100, 100)
GUISetOnEvent($GUI_EVENT_CLOSE, "ExitNow")

$Button1 = GUICtrlCreateButton("Start", 25, 25, 50, 50)
GUICtrlSetOnEvent($Button1, "Start")

GUISetState(@SW_SHOW)

While 1

WEnd

Func Start()
 ;While 1
    GUICtrlSetData($Button1, "Stop")
    GUICtrlSetOnEvent($Button1, "Stop")
    ToolTip("In start function.",0,0)
 ;WEnd
EndFunc

Func Stop()
    GUICtrlSetData($Button1, "Start")
    GUICtrlSetOnEvent($Button1, "Start")
    ToolTip("In stop function.",0,0)
EndFunc

Func ExitNow()
    Exit
EndFunc

not sure what the second while loop is for

edit: should have read tho whole post, woops. let me try again!

now this is going to bug me ! i cannot exit out of that second loop ! there's got to be a way.

Edited February 8, 2006 by pecloe

[huldu]

The only way i know of so far is that if HotKeySet() is used you can exit the loop. However using the HotKeySet of course requires the use of the keyboard. There must be a way to use a "button" for this function aswell (in the GUI).

If someone knows how, please let me know.

[greenmachine]

According to the helpfile:

In the OnEvent mode instead of constantly polling the GUI to find out if anything has happened you make the GUI temporarily pause your script and call a pre-defined function to handle the event. For example, if the user clicks Button1 the GUI pauses your main script and calls a previously defined user function that deals with Button1. When the function call is completed the main script is resumed. This mode is similar to the Visual Basic forms method.

This line specifically: When the function call is completed the main script is resumed.

So, if you're in a while loop inside a function, the OnEvent mode is not receiving any events (or you could say it is temporarily turned off).