По идее должно открыть два окна сразу , но этого не происходит?
Код:
#include <GUIConstantsEx.au3>
Opt("GUIOnEventMode", 1) ; Включает режим OnEvent
$mainwindow = GUICreate("Привет мир", 200, 100)
GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEClicked")
GUICtrlCreateLabel("Привет мир! Как дела?", 30, 10)
$okbutton = GUICtrlCreateButton("OK", 70, 50, 60)
GUICtrlSetOnEvent($okbutton, "OKButton")
$dummywindow = GUICreate("Пустое окно для теста ", 500, 600)
GUISetOnEvent($GUI_EVENT_CLOSE, "CLOSEClicked")
GUISetState(@SW_SHOW,$mainwindow)
While 1
Sleep(1000) ; Цикл ожидания
WEnd
Func OKButton()
;Примечание: в этом месте @GUI_CtrlId равен $okbutton,
MsgBox(0, "Событие GUI", "Вы нажали OK!")
EndFunc
Func CLOSEClicked()
;Примечание: в этом месте @GUI_CtrlId равен $GUI_EVENT_CLOSE,
;@GUI_WinHandle может быть либо $mainwindow, либо $dummywindow
If @GUI_WinHandle = $mainwindow Then
MsgBox(0, "Событие GUI", "Вы нажали CLOSE! Завершаем...")
Exit
EndIf
EndFunc