Exit Button

[Queener]

I see there's a request of help for closing the program because clicking X doesn't take effects. Thread seems old so I didn't want to bump it. Instead I post what might help them here. I've been playing around and it's not easy, but with an Exit button; it worked. Hopefully this will help most users:

#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Include <GuiButton.au3>

$TESTExit = GUICreate("EXITTest",275,250,-1,-1,-1,-1)
$Button = GUICtrlCreateButton("Exit",150,20,100,24,-1,-1)
GUISetState(@SW_SHOW,$TESTEXIT)

Func TestExit()
Exit
EndFunc

While 1
Switch GUIGetMsg()
     Case $GUI_EVENT_CLOSE
     Case $Button

     TestExit()
EndSwitch
WEnd

I know an exit button is not a good practice, but hopefully someone will find it useful. In addition, professional can help out on how to make the X effective.

Edited April 19, 2013 by asianqueen

[Melba23]

asianqueen,

I see there's a request of help for closing the program because clicking X doesn't take effects

And you think that script is going to help?

Your script as posted does not close on [X] because you do not tell it to do anything on receipt of the $GUI_EVENT_CLOSE event. If you do tell it what to do then both the [X] and the button work just fine:

#include <GUIConstantsEx.au3>

$TESTExit = GUICreate("EXITTest", 275, 250)
$Button = GUICtrlCreateButton("Exit", 150, 20, 100, 24)
GUISetState(@SW_SHOW, $TESTExit)

While 1
    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE, $Button
            Exit
    EndSwitch
WEnd

And you can see that there is a lot less of the script as most of the original was completely unnecessary.

I do not want to put you off from tryin gto help, but please try to post things which have some value rather then suggesting that the only way to exit a GUI is to use a button rather then the [X].

M23

P.S. If you want to link to the thread in question we can perhaps discuss why the [X] did not work in that case either.

[Queener]

very funny, I tried that earlier and it didn't want to work on me. Copying paste your code works...

if you don't mind; I can help link the old thread to this post, but as I say; the thread seems old and do not want to bump.

I see my own problem...

I placed my Exit after Case $Button to do something else rather than after Event close.

Edited April 19, 2013 by asianqueen

[Melba23]

asianqueen,

I placed my Exit after Case $Button to do something else rather than after Event close

Correct. You could also do this:

While 1
    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
                ContinueCase
        Case $Button
                Exit
    EndSwitch
WEnd

I quite agree that you should not bump the old thread, but if you copy/paste the URL we can easily take a look and see what the problem was in that case.

M23

[JohnOne]

Or

While 1
    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE, $Button
                Exit
    EndSwitch
WEnd

[TheSaint]

Each to their own I guess, but I much prefer an EXIT button .... providing it's well placed and large enough.

Of course, I also provide the usual 'X' too .... sometimes differentiating what each method does ... on top of exiting - save settings or cleaning up or run something on exit, etc.

Generally, I heartily dislike programs that don't provide a decent EXIT button.

Aiming for little things all the time has a way of annoying me.

You are also unlikely to click the wrong 'X' ... like happens when several windows get overlayed and you are in a hurry.

[Werty]

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$TESTExit = GUICreate("EXITTest", 275, 250, -1, -1, BitOR($WS_CAPTION, $WS_SYSMENU))
$AltF4 = GUICtrlCreateLabel("Press ALT+F4 to exit", 10, 210)
$ContextMenu = GUICtrlCreateContextMenu()
$ContextMenuExit = GUICtrlCreateMenuItem("Exit", $ContextMenu)
$FileMenu = GUICtrlCreateMenu("&File")
$FileExit = GUICtrlCreateMenuItem("Exit", $FileMenu)
$Button = GUICtrlCreateButton("Exit", 150, 20, 100, 24)
GUISetState(@SW_SHOW, $TESTExit)
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE, $Button, $FileExit, $ContextMenuExit
Exit
     EndSwitch
WEnd

That's 6 ways to exit