mef-t
Осваивающий
- Сообщения
- 306
- Репутация
- 30
Доброго времени суток.
Под катом пример программы.
Просьба объяснить, в чем моя ошибка.
1. Мне нужно, чтобы при закрытии дочернего окна закрывалось только дочернее окно.
2. Мне нужно, чтобы при открытом втором окне события, выполняемые в первом, игнорировались. Т.е. если открыто второе окно и я нажал на закрытие родительского, оно не должно закрываться, ни сразу, ни сразу после закрытия дочернего.
Спасибо
Под катом пример программы.
Код:
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Example()
Func Example()
Local $msg
Global $hGui = GUICreate("Окно I", 400, 100)
Local $setting = GUICtrlCreateButton("Настройки", 8,8,68,24)
GUISetState(@SW_SHOW)
While True
$msg = GUIGetMsg(1)
Select
Case $msg[0] = $GUI_EVENT_CLOSE And $msg[1] = $hGui
ExitLoop
Case $msg[0] = $setting
settingsMenu()
EndSelect
WEnd
EndFunc
Func settingsMenu()
Local $iMenuFile, $iMenuHelp
Local $msgD
; GUI
$dummywindow = GUICreate("Настройки", 200, 200, -1, -1, $WS_OVERLAPPEDWINDOW, -1, $hGui)
GUISetState(@SW_SHOW)
While True
$msgD = GUIGetMsg(1)
Select
Case $msgD[0] = $GUI_EVENT_CLOSE And $msgD[1] = $dummywindow
ExitLoop
EndSelect
WEnd
EndFunc
Просьба объяснить, в чем моя ошибка.
1. Мне нужно, чтобы при закрытии дочернего окна закрывалось только дочернее окно.
2. Мне нужно, чтобы при открытом втором окне события, выполняемые в первом, игнорировались. Т.е. если открыто второе окно и я нажал на закрытие родительского, оно не должно закрываться, ни сразу, ни сразу после закрытия дочернего.
Спасибо