So I have a script that works and want to create a GUI to interface with some of the values that can change. I've looked a lots of autoit GUI code trying to figure out why I can't interact with any part of the form. The radio selection doesn't work nor the updown or the simple button. Am I missing some include or setting values?
Thanks,
Kyle
#include <GUIConstants.au3>
#include <ButtonConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <ProgressConstants.au3>
AutoItSetOption("SendKeyDelay", 30)
AutoItSetOption("MouseCoordMode", 0)
Global $games = 5
Global $game = 1
$bgImgFile = "bg.jpg"
$iconFile = "icon.ico"
Global $lx = 0
Global $ly = 0
Global $rx = 0
Global $ry = 0
Global $cx = 0
Global $cy = 0
$form = GUICreate("Title", 640, 480, 0, 0)
GUICtrlSetDefBkColor(0xC0DCC0)
GUICtrlCreatePic($bgImgFile, 0, 0, 640, 480)
GUISetIcon($iconFile, 0)
GuiCtrlCreateGroup("Game Res", 640-100-10, 10, 100, 100)
$radio1440 = GuiCtrlCreateRadio("1440x900", 640-100, 30, 66, 16)
GuiCtrlSetState(-1, $GUI_CHECKED)
$radio1920 = GuiCtrlCreateRadio("1920x1080", 640-100, 50, 72, 16)
GUICtrlCreateGroup ("",-99,-99,1,1) ;close group
GuiCtrlCreateLabel("Number of games to play", 640-240, 10, 120, 16)
$gameNumSelect = GuiCtrlCreateInput("1", 640-200, 30, 40, 20)
$numGameSelector = GuiCtrlCreateUpDown($gameNumSelect)
$progressBar = GUICtrlCreateProgress(145, 450, 350, 16)
GUICtrlSetColor(-1, 0xC0DCC0)
GUICtrlSetBkColor(-1, 0x000000)
GuiCtrlSetData($progressBar, 50)
$button1 = GUICtrlCreateButton("Start", 640-220, 60, 75, 16)
GuiSetState()
bottom($form)
While 1
$msg = GUIGetMsg()
Switch $msg
Case $GUI_EVENT_CLOSE
ExitLoop
Case $button1
If $radio1920 Then
$lx = 630
$ly = 460
$rx = 980
$ry = 460
$cx = 960
$cy = 720
ElseIf $radio1440 Then
$lx = 470
$ly = 390
$rx = 700
$ry = 390
$cx = 720
$cy = 560
EndIf
$games = $numGameSelector
; Working script goes here
EndSwitch
WEnd
Func bottom($form)
$size = WinGetClientSize($form)
Local $y = @DesktopHeight - ($size[1]+55)
Local $x = (@DesktopWidth / 2) - ($size[0] / 2)
Return WinMove($form, "", $x, $y)
EndFunc