exit im ganzen GUI

Dr.Galvany

hallo, wenn ich ein gui habe und da habe ich einen button mit exit.

das ist erst mal kein problem.

wenn das gui aber dann die einstellungen abarbeitet, wie kann man es anstellen, das der exit button trotztem noch geht?

Code

#include <GuiConstants.au3>


GuiCreate("MyGUI", 307, 230,-1, -1 , BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS))


$Start = GuiCtrlCreateButton("Start", 40, 100, 70, 40)
$Exit = GuiCtrlCreateButton("Exit", 160, 100, 90, 40)


GuiSetState()
$msg = 0
While $msg <> $GUI_EVENT_CLOSE
	$msg = GUIGetMsg()
	Select
		Case $msg = $Start
			ExitLoop
		Case $msg = $Exit
			Exit
	EndSelect
WEnd


; hier soll der button exit immer noch gehen!
While 1
	babbababababa
	babababababab	
WEnd

Alles anzeigen

**peethebee**

Hallo!

Also, noch mal (gerade ist mein Firefox beim Schreiben abgestürzt):

An die angegebene Stelle kommt das Programm nur, wenn der Befehl zum Schließen gesendet wurde. Dann sollte es eigentlich nicht mehr wichtig sein, ob der Button gedrückt wurde... Ansonsten kann du auch da wieder GUIGetMsg machen und den Rückgabewert mit der ControlID vergleichen.

Besser wäre evtl. der Einsatz des GUIOnEventMode, bei dem man einfach eine Funktion angibt, die aufgerufen wird, wenn man den Button anklickt. Dann musst du dich nicht darum kümmern, die Nachrichten selbst zu verarbeiten.

peethebee

**GtaSpider**

Um einmal ein Beispiel zumachen:

Code

#include <GuiConstants.au3>






GuiCreate("MyGUI", 307, 230,-1, -1 , BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS))






$Start = GuiCtrlCreateButton("Start", 40, 100, 70, 40)


$Exit = GuiCtrlCreateButton("Exit", 160, 100, 90, 40)






GuiSetState()


$msg = 0


While $msg <> $GUI_EVENT_CLOSE


        $msg = GUIGetMsg()


        Select


                Case $msg = $Start


                        ExitLoop


                Case $msg = $Exit


                        Exit


        EndSelect


WEnd






; hier soll der button exit immer noch gehen!


While 1
	$msg2 = GUIGetMsg()
	If $msg2 = $Exit Then Exit
        bla


WEnd

Alles anzeigen

Und GuiOnEventMode:

Code

#include <GuiConstants.au3>


opt("GuiOnEventMode",1)


GuiCreate("MyGUI", 307, 230,-1, -1 , BitOR($WS_OVERLAPPEDWINDOW, $WS_CLIPSIBLINGS))


$Start = GuiCtrlCreateButton("Start", 40, 100, 70, 40)


$Exit = GuiCtrlCreateButton("Exit", 160, 100, 90, 40)
GUICtrlSetOnEvent(-1,"_exit")




GuiSetState()


$msg = 0


While $msg <> $GUI_EVENT_CLOSE


        $msg = GUIGetMsg()


        Select


                Case $msg = $Start


                        ExitLoop


                Case $msg = $Exit


                        Exit


        EndSelect


WEnd


; hier soll der button exit immer noch gehen!
While 1
;~         bla


WEnd
Func _exit()
	Exit
EndFunc

Alles anzeigen