Page 1 of 1
PLZ finish it Topic is solved
Posted: 15 Apr 2021, 11:58
by GTA123456
Code: Select all
; Generated by AutoGUI 2.6.2
#SingleInstance Force
#NoEnv
SetWorkingDir %A_ScriptDir%
SetBatchLines -1
Gui Add, ComboBox,va x16 y16 w120, lbutton|rbutton
Gui Add, Radio, x16 y40 w120 h23, 200ms
Gui Add, Radio, x16 y64 w120 h23, 500ms
Gui Add, Radio, x16 y88 w120 h23, 1000ms
Gui Add, Radio, x16 y112 w120 h23, 2000ms
Gui Add, Button, x32 y152 w80 h23, &OK
Gui Show, w155 h222, Window
Return
GuiEscape:
GuiClose:
ExitApp
Re: PLZ finish it
Posted: 15 Apr 2021, 12:41
by boiler
Code: Select all
; Generated by AutoGUI 2.6.2
#SingleInstance Force
#NoEnv
SetWorkingDir %A_ScriptDir%
SetBatchLines -1
Times := ["200ms", "500ms", "1000ms", "2000ms"]
Gui Add, ComboBox,va x16 y16 w120 vWhichBtn, lbutton|rbutton
Gui Add, Radio, x16 y40 w120 h23 vTime, % Times[1]
Gui Add, Radio, x16 y64 w120 h23, % Times[2]
Gui Add, Radio, x16 y88 w120 h23, % Times[3]
Gui Add, Radio, x16 y112 w120 h23, % Times[4]
Gui Add, Button, x32 y152 w80 h23, &OK
Gui Show, w155 h222, Window
Return
ButtonOK:
Gui, Submit
MsgBox, % WhichBtn "`n" Times[Time]
Gui, Show
return
GuiEscape:
GuiClose:
ExitApp