Что нового

[Элементы GUI] Проблема с закрытием окна GUI

dimart

Новичок
Сообщения
21
Репутация
0
Код:
While ProcessExists ("test.exe")

Sleep($timer)

;Определение разрешения экрана
If Not IsDeclared("SM_VIRTUALWIDTH") Then Global Const $SM_VIRTUALWIDTH = 78
If Not IsDeclared("SM_VIRTUALHEIGHT") Then Global Const $SM_VIRTUALHEIGHT = 79
$VirtualDesktopWidth = DLLCall("user32.dll", "int", "GetSystemMetrics", "int", $SM_VIRTUALWIDTH)
$VirtualDesktopWidth = $VirtualDesktopWidth[0]
$VirtualDesktopHeight = DLLCall("user32.dll", "int", "GetSystemMetrics", "int", $SM_VIRTUALHEIGHT)
$VirtualDesktopHeight = $VirtualDesktopHeight[0]

Global $_WinWidth=$VirtualDesktopWidth
Global $_WinHeight=$VirtualDesktopHeight

; конец Определение разрешения экрана

     $_MAINGUI = GUICreate("test", $_WinWidth,$_WinHeight, 0, 0, 0x80000000, 136)
    GUISetCursor(16,1)
    GUISetBkColor(0x000000)
    $mainpassentry = GUICtrlCreateInput("", -100, -100, 0, 0)
    GUICtrlSetLimit($mainpassentry, 4)


    $mainimage = GUICtrlCreatePic("img/0.jpg", ((@DesktopWidth/32)-(500/32)), ((@DesktopHeight/12)-(190/12))-50, 0, 0)

	;START COPYRIGHT
    $COPYRIGHT = GUICtrlCreateLabel("test" & @LF & "© test", 4, 4, 100, 45)
    GUICtrlSetColor(-1, 0x999999)
    GUICtrlSetFont(-1, 7)
	;END COPYRIGHT

	GUISetState(@SW_SHOW, $_MAINGUI)


	BlockInput (1)
	sleep(15000)
	BlockInput (0)
	SoundPlay("welldone.mp3")
WEnd


Эта часть программы создаёт окно GUI (через некоторую паузу, из-за sleep) при условии, что процесс test.exe есть в наличии. Требуется убирать это окно на время проверки условия и действия sleep. Обычные GUICtrlDelete не помогли. Требуется помощь :smile:
 

Fever

Скриптер
Сообщения
308
Репутация
112
Код:
GUISetState(@SW_HIDE)
GUISetState(@SW_SHOW)
 
Верх