Resize the gui

[cane]

Ok what im trying to do is whenever 1,2,3,4 or 5 is select it will change the variable $height to whatever it is set. So far i have

expandcollapse popup

#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$height = "41"
$Form1 = GUICreate("ArtaTalker v4", 560, $height, 192, 124)
$Effects = GUICtrlCreateCombo("Effects", 112, 8, 81, 25)
GUICtrlSetData(-1, "Scroll|Shake|Slide|Wave|Wave2|None")
$number = GUICtrlCreateCombo("Number of Msg", 8, 8, 97, 25)
GUICtrlSetData(-1, "1|2|3|4|5")
$Colors = GUICtrlCreateCombo("Colors", 200, 8, 81, 25)
GUICtrlSetData(-1, "Red|Green|Cyan|Purple|White|None")
$ontop = GUICtrlCreateCheckbox("Always on Top", 288, 13, 97, 17)
$mindelay = GUICtrlCreateInput("1", 432, 8, 25, 21)
$maxdelay = GUICtrlCreateInput("4", 520, 8, 25, 21)
$Label1 = GUICtrlCreateLabel("MinDelay", 384, 15, 48, 17)
$m = GUICtrlCreateLabel("MaxDelay", 471, 15, 49, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

Case $Effects
    If GUICtrlRead($Effects) = "Scroll" Then
        MsgBox(1,"","ttest")
    ElseIf GUICtrlRead($Effects) = "Shake" Then
        MsgBox(1,"","Grren")
    ElseIf GUICtrlRead($Effects) = "Slide" Then
        MsgBox(1,"","Cyan")
    ElseIf GUICtrlRead($Effects) = "Wave" Then
        MsgBox(1,"","Purple")
    ElseIf GUICtrlRead($Effects) = "Wave2" Then
        MsgBox(1,"","White")
    EndIf
Case $number
    If GUICtrlRead($number) = "1" Then
        $height = "444"
    EndIf
Case $Colors
    If GUICtrlRead($Colors) = "Red" Then
        MsgBox(1,"","ttest")
    ElseIf GUICtrlRead($Colors) = "Green" Then
        MsgBox(1,"","Grren")
    ElseIf GUICtrlRead($Colors) = "Cyan" Then
        MsgBox(1,"","Cyan")
    ElseIf GUICtrlRead($Colors) = "Purple" Then
        MsgBox(1,"","Purple")
    ElseIf GUICtrlRead($Colors) = "White" Then
        MsgBox(1,"","White")
    EndIf
Case $ontop
Case $mindelay
Case $maxdelay
EndSwitch
WEnd

Could you point me in the right direction please do not do it all for me but can you give me a good hint of what to use. Thanks for reading

[Melba23]

cane,

From the Help file for WinMove :

"WinMove ( "title", "text", x, y [, width [, height[, speed]]]) - If x and y equal to the Default keyword no move occurs, just resizing."

But look carefully at GUICtrlSetResizing and Opt("GUIResizeMode") - if not you will find all your controls resizing too!

M23