GuiSetOnEvent not working

[lrstndm]

In my code below the GuiSetOnEvent is not working for the button Exit.

But it is working for the $GUI_EVENT_CLOSE event.

What am I doing wrong?

#include 

Opt("GUIOnEventMode", 1)

GUICreate("Test", 200, 100, -1, -1)
GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit")

$button = GUICtrlCreateButton("Exit", 50, 50, 75, 25)
GUISetOnEvent($button, "_Exit")

GUISetState(@SW_SHOW)

While 1
Sleep(10)
WEnd

Func _Exit()
Exit
EndFunc

Thanks.

lrstndm

[PhoenixXL]

GUICtrlSetOnEvent

[lrstndm]

I really started crying when I saw your post...... thanks.

[queensoft]

Spent about 20 minutes on this, banging my head against the wall !!

Thank you !!!