GUICreate("Деинсталяция " & $result, 350, 120)
GUISetIcon("shell32.dll", 33)
GUICtrlCreateLabel("Удаление " & $result, 10, 15, 340, 40)
GUICtrlSetFont (-1, 15, 450)
$n1=GUICtrlCreateIcon (@windowsdir & "\cursors\hourgla3.ani", -1, 140,45,64,64)
GUISetState()
$setUp = GUIGetMsg()
While 1
$msg = GUIGetMsg()
Select
Case $msg = $setUp
$startTime = _Timer_Init()
RunWait ("msiexec /norestart /quiet /uninstall ..........")
$stopTime = _Timer_Diff($startTime)
If $stopTime < 3000 Then
MsgBox (16, "Ошибка", "Ошибка удаления " & $result)
Exit
EndIf
;вот здесь надо закрыть окно как это сделать?
EndSelect
WEnd
;Долгое продолжение скрипта