Имеется такой скрипт:
Вопрос как сделать чтобы при изменение размера окна
также автоматически менялся размер
Для большей ясности про что я, добавил во вложение скрин там после запуска изменен размер главного окна,а размер дочернего так и остался неизменным (рамка дочернего внизу обведена красным).
надо чтобы они изменялись вместе.
Код:
#Include <WinAPI.au3>
#include <GUIConstants.au3>
$color = 0x0aa0221188882288
#Region ### START Koda GUI section ###
Global $hForm1,$iMsg, $iW = 798, $iH = 130
$hForm1 = GUICreate('Программа', $iW, $iH, 560, 690, $WS_POPUPWINDOW, BitOR($WS_EX_LAYERED,$WS_EX_TOPMOST,$WS_CLIPCHILDREN))
GUISetBkColor(0x000000)
WinSetTrans($hForm1, '', 150)
GUISetState(@SW_SHOW, $hForm1)
$Form2 = GUICreate( "Form2", $iW, $iH, -1, -1, $WS_POPUPWINDOW, BitOR($WS_EX_LAYERED,$WS_EX_MDICHILD), $hForm1)
$okno = GUICtrlCreateLabel("Текст", 9, 0, 780, 130, BitOR($ES_CENTER,$ES_AUTOVSCROLL,$ES_AUTOHSCROLL))
GUICtrlSetFont(-1, 22, 1490, 0, "CyrillicHover")
GUICtrlSetColor(-1, 0xFFDD30)
GUISetBkColor($color)
_WinAPI_SetLayeredWindowAttributes($Form2, $color)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
_1() ; Вызов функции
Func _1()
Local $i
While 1
$text = ControlGetText ( '', '', '; :]')
Sleep(100)
;~ GUICtrlSetData(-1, $text)
Sleep(1000)
WEnd
EndFunc
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Вопрос как сделать чтобы при изменение размера окна
Код:
$hForm1 = GUICreate('Программа', $iW, $iH, 560, 690, $WS_POPUPWINDOW, BitOR($WS_EX_LAYERED,$WS_EX_TOPMOST,$WS_CLIPCHILDREN))
также автоматически менялся размер
Код:
$Form2 = GUICreate( "Form2", $iW, $iH, -1, -1, $WS_POPUPWINDOW, BitOR($WS_EX_LAYERED,$WS_EX_MDICHILD), $hForm1)
$okno = GUICtrlCreateLabel("Текст", 9, 0, 780, 130, BitOR($ES_CENTER,$ES_AUTOVSCROLL,$ES_AUTOHSCROLL))
Для большей ясности про что я, добавил во вложение скрин там после запуска изменен размер главного окна,а размер дочернего так и остался неизменным (рамка дочернего внизу обведена красным).
надо чтобы они изменялись вместе.