GUICreate
Создаёт GUI окно.
GUICreate ( "title" [, width [, height [, left = -1 [, top = -1 [, style = -1 [, exStyle = -1 [, parent = 0 ]]]]]]] )
Параметры
title | Заголовок окна. |
width |
[необязательный] Ширина окна. |
height |
[необязательный] Высота окна. |
left |
[необязательный] Координата левого края. По умолчанию (-1), окно создаётся в центре. Если параметр задан, нужно также задать координату верхнего края. |
top |
[необязательный] Координата верхнего края. По умолчанию (-1), в центре. |
style |
[необязательный] Определяет стиль окна. Смотрите Стили элементов GUI в приложении. Используйте -1 для стандартного стиля, который включает стили $WS_MINIMIZEBOX, $WS_CAPTION, $WS_POPUP и $WS_SYSMENU. Некоторые стили всегда включены: $WS_CLIPSIBLINGS и $WS_SYSMENU, если добавлены $WS_MAXIMIZEBOX или $WS_SIZEBOX. |
exStyle |
[необязательный] Расширенные стили окна. Смотрите таблицу расширенных стилей ниже. По умолчанию -1. |
parent |
[необязательный] Дескриптор предыдущего окна, для которого текущее окно становится дочерним. |
Возвращаемое значение
Успех: | Возвращает дескриптор окна. |
Ошибка: | Возвращает 0, если окно не может быть создано, и устанавливает @error равным 1. |
Примечания
Расширенные стили имеющие префикс $WS_EX_ должны определятся в параметре exStyle, а стили без этого префикса помещаются в параметр style. Не следует их путать, так как они будут иметь свойства не соответствующие их назначению. Правильно выбранные стили создают окно, в котором размер клиентской области соответствует указанным величинам в параметрах width, height.См. также
GUISetParameters..., GUICtrlCreate..., GUIGetMsg, GUISwitch, GUIGetStyle, GUIDelete, WinGetHandle, GUICtrlSetDefBkColor, GUICtrlSetDefColor, GUIGetCursorInfoПример
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Example1()
Example2()
; Пример 1
Func Example1()
Local $msg
GUICreate("Мой GUI", -1, -1, -1, -1, $WS_OVERLAPPEDWINDOW + $WS_POPUP) ; Создаёт окно в центре экрана
GUISetState(@SW_SHOW) ; показывает созданное окно
; Запускается цикл опроса GUI до тех пор пока окно не будет закрыто
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
ExitLoop
EndSwitch
WEnd
GUIDelete()
EndFunc
; Пример 2
Func Example2()
Local $hGui, $background, $pic, $basti_stay, $msg
Local $sFile = @ScriptDir & "\..\GUI\logo4.gif"
$hGui = GUICreate("Окно с фоном", 400, 100)
; фоновый рисунок
$background = GUICtrlCreatePic(@ScriptDir & "\..\GUI\msoobe.jpg", 0, 0, 400, 100)
GUISetState(@SW_SHOW)
; прозрачное дочернее окно MDI
$pic = GUICreate("", 169, 68, 20, 20, $WS_POPUP, BitOR($WS_EX_LAYERED, $WS_EX_MDICHILD), $hGui)
; прозрачный рисунок
$basti_stay = GUICtrlCreatePic($sFile, 0, 0, 169, 68)
GUISetState(@SW_SHOW)
Do
$msg = GUIGetMsg()
Until $msg = $GUI_EVENT_CLOSE
EndFunc