vicbox777
![](http://forum.ru-board.com/board/avatars/p11.gif)
Junior Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору VitAlll2013 13:19 22-09-2009 Цитата: Как изменить размер окна (формы) самого приложения AutoIT? Нажал на кнопку, и окно увеличилось на сколько то там пикселей... | Вот примерно так это делается: Код: #include <GuiConstants.au3> $GUI = GUICreate("Resize GUI", 300, 200) $ResizeGUI_Button = GUICtrlCreateButton("Resize", 20, 40, 70, 20) GUICtrlSetResizing(-1, $GUI_DOCKALL) GUISetState(@SW_SHOW, $GUI) While 1 Switch GUIGetMsg() Case $GUI_EVENT_CLOSE Exit Case $ResizeGUI_Button Local $aGUI_Pos = WinGetPos($GUI) ;Увеличиваем размер GUI на 5 единиц с каждой стороны (в высоту и в ширену) WinMove($GUI, "", $aGUI_Pos[0], $aGUI_Pos[1], $aGUI_Pos[2] + 5, $aGUI_Pos[3] + 5) EndSwitch WEnd | Цитата: Почему при закрытии дочернего окна закрывается сразу вся программа? | Значит неправильный код. Вот так будет работать: Код: #include <GuiConstantsEx.au3> $hGUI_Main = GUICreate("Main GUI", 300, 200) $AboutButton = GUICtrlCreateButton("About", 105, 50, 75, 23) $hGUI_Child = GUICreate("Child GUI", 200, 100, -1, -1, -1, -1, $hGUI_Main) GUISetState(@SW_SHOW, $hGUI_Main) While 1 $msg = GUIGetMsg(1) Select Case ($msg[0] = $GUI_EVENT_CLOSE) And ($msg[1] = $hGUI_Main) Exit Case ($msg[0] = $GUI_EVENT_CLOSE) And ($msg[1] = $hGUI_Child) GUISetState(@SW_ENABLE, $hGUI_Main) GUISetState(@SW_HIDE, $hGUI_Child) Case $msg[0] = $AboutButton GUISetState(@SW_DISABLE, $hGUI_Main) GUISetState(@SW_SHOW, $hGUI_Child) EndSelect WEnd |
|