|
发表于 2012-3-29 07:53:43
|
显示全部楼层
浙江省温州市
[e].版本 2
.支持库 EThread
.程序集 窗口程序集1
.程序集变量 进入许可证1, 整数型
.程序集变量 进入许可证2, 整数型
.程序集变量 进入许可证3, 整数型
.程序集变量 进入许可证4, 整数型
.程序集变量 客户句柄数组, 整数型, , "0"
.子程序 _按钮1_被单击
进入许可证1 = 创建进入许可证 ()
进入许可证2 = 创建进入许可证 ()
进入许可证3 = 创建进入许可证 ()
进入许可证4 = 创建进入许可证 ()
启动线程 (&发送文本1, , )
启动线程 (&发送文本2, , )
启动线程 (&发送文本3, , )
启动线程 (&发送文本4, , )
服务器.取客户数组 (客户句柄数组)
.子程序 发送文本1
进入许可区 (进入许可证1)
服务器.发送文本 (客户句柄数组 [1], 请求文本)
退出许可区 (进入许可证1)
删除进入许可证 (进入许可证1)
.子程序 发送文本2
进入许可区 (进入许可证2)
服务器.发送文本 (客户句柄数组 [2], 请求文本)
退出许可区 (进入许可证2)
删除进入许可证 (进入许可证2)
.子程序 发送文本3
进入许可区 (进入许可证3)
服务器.发送文本 (客户句柄数组 [3], 请求文本)
退出许可区 (进入许可证3)
删除进入许可证 (进入许可证3)
.子程序 发送文本4
进入许可区 (进入许可证4)
服务器.发送文本 (客户句柄数组 [4], 请求文本)
退出许可区 (进入许可证4)
删除进入许可证 (进入许可证4)
[/e]
补充内容 (2012-3-29 09:15):
4个数组为例 多了照着写下去 不要嫌麻烦 了解??? |
|