Script GUI loop problem

[tiredodftry]

I have a script I wrote for monitoring and it works well except for continuing after a form is closed. Most likely I am missing something simple, but what I want it to do is as follows.

1) Watch for a field change

2) Display a form with the changes

3) When the form is closed start at step 1 again

Here is a very simplified script which shows the same issue as I am having. What I want the code below to do is.

1) Show the message box stating 'This should be displayed'

2) Show a form with a 'Close' button

3) When the form is closed (with the close button), start at step 1 again (show message, show form, etc)

Should this work? If not, how can I get the expected results above?

Thanks,

Randy

#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

While 1
     MsgBox(0, "Test", "This should be displayed")
     showGUI()
WEnd


Func showGUI()
     #Region ### START Koda GUI section ###
     $Form1 = GUICreate("Any Form", 425, 176, 100, 177)

     $btnClose = GUICtrlCreateButton("Close", 160, 130, 75, 25)

     GUISetState(@SW_SHOW)
     #EndRegion ### END Koda GUI section ###

     While 1
          $nMsg = GUIGetMsg()
          Switch $nMsg
               Case $btnClose
                GUIDelete($form1)
          EndSwitch
     WEnd

EndFunc

[JLogan3o13]

Your script is doing just what you told it to, delete the GUI and end. If you wanted to loop back to the start, you would have to put the first few lines in a function, like this (terribly inefficient, btw):

#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

_Main()

Func _Main()
While 1
     MsgBox(0, "Test", "This should be displayed")
     showGUI()
WEnd
EndFunc

Func showGUI()
     #Region ### START Koda GUI section ###
     $Form1 = GUICreate("Any Form", 425, 176, 100, 177)
     $btnClose = GUICtrlCreateButton("Close", 160, 130, 75, 25)
     GUISetState(@SW_SHOW)
     #EndRegion ### END Koda GUI section ###
     While 1
         $nMsg = GUIGetMsg()
         Switch $nMsg
             Case $btnClose
             GUIDelete($form1)
    _Main()
         EndSwitch
     WEnd
EndFunc

Edit: Or do it Melba's way I've never done it that way before. Still, rather than deleting and recreating your GUI over and over again, you might consider a child just to perform one step, and then destroy that one.

Edited April 25, 2013 by JLogan3o13

[Melba23]

tiredodftry,

Add a Return line after the GUIDelete line so that the function ends and you get back to the loop.

M23

[tiredodftry]

I figured it would be something simple. The 'Return' worked like charm. Thanks Melba