找回密码
 加入
搜索
查看: 2032|回复: 4

关于checkbox的问题

[复制链接]
发表于 2009-8-19 16:36:09 | 显示全部楼层 |阅读模式
本帖最后由 xavier880819 于 2009-8-20 09:04 编辑

请问如果在我的UI里面有多个checkbox,那么如果使用一个控件来做到点一下就选择全部,再点一下就取消全部呢??谢谢了。

我有试过在里面做个case .....
                           checkbox1.........checked
                           checkbox2.........checked
                           checkbox3.........checked
                                   .
                                   .
                                   .
那么还是用这个控件,unchecked怎么办呢?我又不想做多一个空间来专门unchecked。
发表于 2009-8-19 17:06:58 | 显示全部楼层
给你弄个例子:
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

$Form1 = GUICreate("全选\全不选-test", 260, 280)
Dim $Checkbox[10], $ztbj = 1
$Checkbox[1] = GUICtrlCreateCheckbox("1", 50, 50, 25, 17)
$Checkbox[2] = GUICtrlCreateCheckbox("2", 120, 50)
$Checkbox[3] = GUICtrlCreateCheckbox("3", 190, 50)
$Checkbox[4] = GUICtrlCreateCheckbox("4", 50, 100)
$Checkbox[5] = GUICtrlCreateCheckbox("5", 120, 100)
$Checkbox[6] = GUICtrlCreateCheckbox("6", 190, 100)
$Checkbox[7] = GUICtrlCreateCheckbox("7", 50, 150)
$Checkbox[8] = GUICtrlCreateCheckbox("8", 120, 150)
$Checkbox[9] = GUICtrlCreateCheckbox("9", 190, 150)
$Button1 = GUICtrlCreateButton("全选", 50, 210, 170, 25, $WS_GROUP)
GUISetState()

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
                Case $Button1
                        If $ztbj = 1 Then
                                For $i = 1 To 9
                                        GUICtrlSetState($Checkbox[$i], $GUI_CHECKED)
                                Next
                                GUICtrlSetData($Button1, "全不选")
                                $ztbj = 0
                        Else
                                For $i = 1 To 9
                                        GUICtrlSetState($Checkbox[$i], $GUI_UNCHECKED)
                                Next
                                GUICtrlSetData($Button1, "全选")
                                $ztbj = 1
                        EndIf
        EndSwitch
WEnd
 楼主| 发表于 2009-8-19 17:30:47 | 显示全部楼层
谢谢,这样就可以达到那种效果了。
afan又是你帮助了我。谢谢你!!
发表于 2010-9-26 19:04:33 | 显示全部楼层
路过,学习了
发表于 2011-9-4 09:45:03 | 显示全部楼层
學習中謝謝
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-10-1 17:38 , Processed in 0.071029 second(s), 20 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表