Имя пользователя:
Пароль:
 

Показать сообщение отдельно

Аватара для FlatX007

Ветеран


Сообщения: 553
Благодарности: 87

Профиль | Отправить PM | Цитировать


Код: Выделить весь код
Global $hGUI

$hG = _GuiCreate()

If MsgBox(36, "", "Пересоздать окно ?") = 6 Then
    GUIDelete($hG)
    $hG = _GuiCreate()
EndIf

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case -3
            Exit

    EndSwitch
WEnd

Func _GuiCreate()

    $hGUI = GUICreate("", 350, 246)
    GUISetState(@SW_SHOW)
    Return $hGUI

EndFunc   ;==>_GuiCreate
Это сообщение посчитали полезным следующие участники:

Отправлено: 16:27, 18-06-2010 | #2