易语言多线程批量登录实现一键选中取消选择框账号

为了对账号选择操作的方便，可以添加一个按钮，实现一键全部选中账号，一键取消选中账号，从而把所有的账号一次加入到超级列表框里面，如下图：

全部选中

.版本 2
.支持库 iext

.子程序 _按钮_全部选中_被单击
.局部变量 组件句柄, 整数型
.局部变量 组件数目, 整数型
.局部变量 n, 整数型
.局部变量 自定义选择框, 选择框

超级列表框1.全部删除 ()
组件句柄 ＝ 寻找组件 (_启动窗口, “选择框”, , , )
组件数目 ＝ 取找到组件数目 (组件句柄)
.计次循环首 (组件数目, n)
    组件数目 ＝ 组件数目 － 1
    自定义选择框 ＝ 取所找到组件 (组件句柄, 组件数目)
    自定义选择框.选中 ＝ 真
.计次循环尾 ()
加入成员 (account, “rztx”)
加入成员 (account, “embzhu”)
加入成员 (account, “twqiangwang”)
账号加入列表框 ()
清除组件寻找句柄 (组件句柄)
按钮_全部选中.禁止 ＝ 真

全部取消

.版本 2
.支持库 iext

.子程序 _按钮_取消选中_被单击
.局部变量 组件句柄, 整数型
.局部变量 组件数目, 整数型
.局部变量 k, 整数型
.局部变量 自定义选择框, 选择框

超级列表框1.全部删除 ()
组件句柄 ＝ 寻找组件 (_启动窗口, “选择框”, , , )
组件数目 ＝ 取找到组件数目 (组件句柄)
.计次循环首 (组件数目, k)
    组件数目 ＝ 组件数目 － 1
    自定义选择框 ＝ 取所找到组件 (组件句柄, 组件数目)
    自定义选择框.选中 ＝ 假
.计次循环尾 ()
清除组件寻找句柄 (组件句柄)
清除数组 (account)
按钮_全部选中.禁止 ＝ 假

源码：易语言大漠《剑侠情缘》多线程批量登录一键选中取消选择框