Two GUIs but only one responds

[TryingToCode]

I'm struggling with 2 GUIs where one opens the other.  The first GUI successfully opens the second but then I can't get the second GUI to respond to any events or button presses.  Please could someone help identify what am I missing?

Here is some example code to illustrate my problem.

expandcollapse popup

#include <GUIConstantsEx.au3>

Opt("GUIOnEventMode", 1)

Example()

Func Example()
    Global $hFirstGUI = GUICreate("First GUI", 330, 120)
    GUISetOnEvent($GUI_EVENT_CLOSE, "CloseGUI")
    Local $idNewGUI = GUICtrlCreateButton("New GUI", 10, 90, 85, 25)
    GUICtrlSetOnEvent(-1, "NewGUI")
    Local $idOK = GUICtrlCreateButton("OK", 240, 90, 85, 25)
    GUICtrlSetOnEvent(-1, "CloseGUI")
    GUISetState(@SW_SHOW, $hFirstGUI)
    While 1
      Sleep(100)
    WEnd
EndFunc

Func CloseGUI()
   GUIDelete($hFirstGUI)
   Exit
EndFunc

Func NewGUI()
    GUIDelete($hFirstGUI)
    Global $hSecondGUI = GUICreate("Second GUI")
    GUISetOnEvent($GUI_EVENT_CLOSE, "CloseGUI2",$hSecondGUI)
    Local $idOK = GUICtrlCreateButton("OK", 310, 370, 85, 25)
    GUICtrlSetOnEvent($idOK, "CloseGUI2")
    GUISetState(@SW_SHOW, $hSecondGUI)
    While 1
        Sleep(100)
    WEnd
 EndFunc

 Func CloseGUI2()
   GUIDelete($hSecondGUI)
   Exit
EndFunc

I'm using Opt("GUIOnEventMode", 1) because this is required elsewhere in my code.

[SOLVE-SMART]

Hi @TryingToCode,

this should be helpful: managing-multiple-guis 😀 .

Best regards
Sven

[TryingToCode]

Thanks, the answer was that I needed to delete the following lines from my NewGUI function.  They are only needed in the first GUI.

While 1
        Sleep(100)
    WEnd