Hỏi đáp Cho hỏi cách thay đổi kích thước GUI

Em có code tạo 1 Gui đơn giản thế này

Mã (Text):

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 310, 166, 192, 124)
$Button1 = GUICtrlCreateButton("Mở rộng", 248, 144, 57, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1


    EndSwitch
WEnd

Code trên tao ra 1 gui và 1 nút "Mở rộng"
Em muốn nhấn vào nút 'Mở rộng" thì kích thước của Gui thay đổi, VD kích thước của Gui trên là 310x166, sau khi nhấn thì kích thước của gui là 400x200 chẳng hạn, vậy có hàm nào thay đổi kích thước của Gui như em nói, bác nào biết giúp em với ạ, thanks!

 

Mã (AutoIt):

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 310, 166, 192, 124)
$Button1 = GUICtrlCreateButton("Mở rộng", 248, 144, 57, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
        Case $Button1
            ResizeGUI()
    EndSwitch
WEnd

Func ResizeGUI()
    Local $aGUIPos = WinGetPos($Form1)
    WinMove($Form1,"",$aGUIPos[0],$aGUIPos[1],400,200)
EndFunc

 

Em cmar ơn bác đã quan tâm, em có thử và có thay đổi kích thước, nhưng vị trí và kích thước của các label hoặc buttoon cũng scale theo kích thước của Gui, có cách nào Gui thay đổi kích thước nhưng label không dãn ra theo kích thước thay đổi đó k? Thanks bác

 

Bạn thêm option này xem, kiểm tra lại có đúng ý bạn không?

Mã (AutoIt):

Opt("GUIResizeMode",$GUI_DOCKALL)