线程池多线程拨号操作例子

启动 暂停 停止 拨号 列表取号 模拟对接取号

.判断开始 (单选框_列表.选中)
phone ＝ 列表取文本 (index, 1)
.判断 (单选框_取号.选中)
线程许可.进入 ()
phone ＝ 接码.blueFox_getPhone ()
index ＝ 超级列表框_list.插入表项 (, , , , , )
' 连续赋值 (超级列表框_list.插入表项 (, , , , , ), 列表索引, index)
超级列表框_list.置标题 (index, 0, 到文本 (index ＋ 1))
超级列表框_list.置标题 (index, 1, phone)
程序_延时 (100)
线程许可.退出 ()

.如果真 (任务.login (phone, smsCode) ＝ 假)
列表置文本 (index, 3, “登录失败”)
返回 ()
.如果真结束
列表置文本 (index, 3, “登录成功”)
原子_递增 (任务成功数)
标签置文本 (标签_success, 到文本 (任务成功数))