[Q] GuiCTRLSetOnEvent isnt work!

[blackman12 0]

I give a basic example for telling to my problem.

Opt("GUIOnEventMode", 1)
Global $Form1, $Form2
form1()
Func form1()
    $Form1 = GUICreate("Form1", 117, 60, 192, 124)
    $Button1 = GUICtrlCreateButton("Button1", 16, 16, 75, 25)
    GUICtrlSetOnEvent(-1,"form2")
    GUISetState(@SW_SHOW)
    while 1
    wend
EndFunc

Func form2()
    $Form2 = GUICreate("Form2", 117, 60, 192, 124)
    $Button2 = GUICtrlCreateButton("Button2", 16, 16, 75, 25)
    GUICtrlSetOnEvent(-1,"sil")
    GUISetState(@SW_SHOW)
EndFunc

Func sil()
    GUIDelete($Form1)
    GUIDelete($Form2)
    form1()
EndFunc

if you click button1, it open Form2 and if you click button2, it close form1 and form2 than, open a new form1.But now in this form1, guictrlsetonevent cant work!

But why? How can i solve this problem?

[JohnOne 1,591]

EDIT:

wrong answer, cant delete.

Edited February 8, 2011 by JohnOne

[BrewManNH 1,143]

Move the While...Wend loop outside of all your functions. See the lines marked with <<<<<<<<<<<<< below.

Opt("GUIOnEventMode", 1)
Global $Form1, $Form2
form1()
Func form1()
    $Form1 = GUICreate("Form1", 117, 60, 192, 124)
    $Button1 = GUICtrlCreateButton("Button1", 16, 16, 75, 25)
    GUICtrlSetOnEvent(-1,"form2")
    GUISetState(@SW_SHOW)
EndFunc

Func form2()
    $Form2 = GUICreate("Form2", 117, 60, 192, 124)
    $Button2 = GUICtrlCreateButton("Button2", 16, 16, 75, 25)
    GUICtrlSetOnEvent(-1,"sil")
    GUISetState(@SW_SHOW)
EndFunc

Func sil()
    GUIDelete($Form1)
    GUIDelete($Form2)
    form1()
EndFunc
while 1          ; <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
     Sleep(100)  ; <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
wend             ; <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<

Edit

Forgot to include the code

Edited February 8, 2011 by BrewManNH

[blackman12 0]

Oupf :| Thanks a lot