读取指定控件如果为真则执行 问题
本帖最后由 qq4045728 于 2010-3-1 21:51 编辑创建了许多复选框
然后用GUICtrlRead读取控件状态，如果复选框被选中则执行。
之前已经定义了$i的复选框值了
$n = GUICtrlRead($i)
If $n = $GUI_UNCHECKED Then
DirRemove(@ProgramFilesDir & "\Microsoft Games\Chess",1)
EndIf为什么却没效果
还有 For $m = $Checkbox1 to $Checkbox22 Step 1这样的循环生效吗？ 本帖最后由 jybb001 于 2010-3-1 22:37 编辑
回复 1# qq4045728
做了个例子给你，不知道是不是你想要的样子#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Opt("GUIOnEventMode", 1)
#Region ### START Koda GUI section ### Form=
Dim $Checkbox
$Form1 = GUICreate("示例", 538, 196, 192, 114)
GUISetOnEvent($GUI_EVENT_CLOSE, "Form1Close")
GUISetOnEvent($GUI_EVENT_MINIMIZE, "Form1Minimize")
GUISetOnEvent($GUI_EVENT_MAXIMIZE, "Form1Maximize")
GUISetOnEvent($GUI_EVENT_RESTORE, "Form1Restore")
$Checkbox = GUICtrlCreateCheckbox("Checkbox1", 80, 32, 97, 17)
GUICtrlSetOnEvent(-1, "CheckboxClick")
$Checkbox = GUICtrlCreateCheckbox("Checkbox2", 80, 56, 97, 17)
GUICtrlSetOnEvent(-1, "CheckboxClick")
$Checkbox= GUICtrlCreateCheckbox("Checkbox3", 80, 88, 97, 17)
GUICtrlSetOnEvent(-1, "CheckboxClick")
$Checkbox = GUICtrlCreateCheckbox("Checkbox4", 80, 120, 97, 17)
GUICtrlSetOnEvent(-1, "CheckboxClick")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
Sleep(100)
WEnd
Func CheckboxClick()
Dim $Checkboxchecked
For $i=1 To 5
$Checkboxchecked[$i] = GUICtrlRead($Checkbox[$i])
If $Checkboxchecked[$i]=$GUI_CHECKED Then
MsgBox(0,"","$Checkbox["&$i&"] 被选中") ;具体要实现什么样的功能看你了
Else
ContinueLoop
EndIf
Next
EndFunc
Func Form1Close()
Exit
EndFunc
Func Form1Maximize()
EndFunc
Func Form1Minimize()
EndFunc
Func Form1Restore()
EndFunc
谢谢。哈。解决了
页:
[1]