Цитата:
Цитата sashadeg
У можно сделать чтобы у GUI она небыло ВООБЩЕ бордюров... и Без Строки Заголовка (и канешна без свернуть, развернуть, закрыть...) »
|
Не бойся эксперементировать :clapping:
Пример:
Код:
Opt('GUIOnEventMode', 1)
Opt('MustDeclareVars', 1)
Opt('TrayIconDebug', 1)
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
HotKeySet('{ESC}', '_Pro_Exit')
Local $hMainWin = GUICreate('Main Win', 300, 300, -1, -1, $WS_POPUP)
GUIRegisterMsg($WM_NCHITTEST, 'WM_NCHITTEST')
GUICtrlCreateLabel('1. Окно со стилем: $WS_POPUP' & @CRLF & @CRLF & '2. Это окно можно перемещать за любую облость, за это отвечает функция: WM_NCHITTEST' & _
@CRLF & @CRLF & '3. Так же, можно перемещать окно за Lable и другие GUI объекты, которым назначен доп. стиль $GUI_WS_EX_PARENTDRAG, как у этого Lable-а' & _
@CRLF & @CRLF & '4. И нажав клавишу ESС, можно телепартироваться в другу вселенную ;-) За это отвечает: HotKeySet', _
20, 20, 270, 280, -1, $GUI_WS_EX_PARENTDRAG)
GUISetState()
While 1
Sleep(10)
WEnd
Func _Pro_Exit()
Exit
EndFunc
Func WM_NCHITTEST($hWnd, $Msg, $wParam, $lParam)
Local $iProc = DllCall('user32.dll', 'int', 'DefWindowProc', 'hwnd', $hWnd, 'int', $Msg, 'wparam', $wParam, 'lparam', $lParam)
If $iProc[0] = $HTCLIENT Then Return $HTCAPTION
Return $GUI_RUNDEFMSG
EndFunc
Поддерживаемые стили можно найти в справке. Русский вариант: Справка > Приложения > Стили управляющих элементов GUI |
