易语言怎么实现TCP客户端连接多个服务端源码写法？

求个TCP 客服端连接多个服务端源码 服务端 127.0.0.1 端口4500   127.0.0.1 端口4501   127.0.0.1 端口4502   127.0.0.1 端口4503 客服端 如何连接多个服务端   （客服端 在一个软件） 解决代码如下： .版本 2 .程序集 TCP客户Duan .程序集变量 集_通信句柄, 整数型 .程序集变量 客户Duan, ITcpPackClient .程序集变量 集_通信句柄2, 整数型 .程序集变量 客户Duan2, ITcpPackClient .程序集变量 服务器IP, 文本型 .子程序 启动客户Duan服务 .局部变量 状态, 逻辑型 .局部变量 启动, 整数型 启动 ＝ 取启动时间 () .如果 (集_通信句柄 ≠ 0)     客户Duan.销毁tcppackclient (集_通信句柄, 假) .否则 .如果结束 集_通信句柄 ＝ 客户Duan.创建 (假) .如果 (集_通信句柄 ≠ 0)     .如果 (客户Duan.启动 (集_通信句柄, “127.0.0.1”, 到整数 (2001), , , ) ＝ 真)         客户Duan.事件_客户离开 (&客_断开连接)         客户Duan.事件_发送数据 (&客_发送事件)         客户Duan.事件_数据到达 (&客_数据到达)         _启动窗口.按钮1.标题 ＝ “重启连接”         _启动窗口.时钟3.时钟周期 ＝ 0     .否则         _启动窗口.按钮1.标题 ＝ “连接服务”         _Log客户Duan (“连接失败”, “服务器连接失败，请重启软件后再次尝试！”)     .如果结束 .否则     _启动窗口.按钮1.标题 ＝ “连接服务”     _Log客户Duan (“创建失败”, “创建通信组件失败，请重启软件后再次尝试！”) .如果结束 .子程序 启动客户Duan服务2 .局部变量 状态, 逻辑型 .局部变量 启动, 整数型 启动 ＝ 取启动时间 () .如果 (集_通信句柄 ≠ 0)     客户Duan.销毁tcppackclient (集_通信句柄, 假) .否则 .如果结束 集_通信句柄 ＝ 客户Duan.创建 (假) .如果 (集_通信句柄 ≠ 0)     .如果 (客户Duan.启动 (集_通信句柄, “127.0.0.1”, 到整数 (2002), , , ) ＝ 真)         客户Duan.事件_客户离开 (&客_断开连接)         客户Duan.事件_发送数据 (&客_发送事件)         客户Duan.事件_数据到达 (&客_数据到达)         _启动窗口.按钮1.标题 ＝ “重启连接”         _启动窗口.时钟3.时钟周期 ＝ 0     .否则         _启动窗口.按钮1.标题 ＝ “连接服务”         _Log客户Duan (“连接失败”, “服务器连接失败，请重启软件后再次尝试！”)     .如果结束 .否则     _启动窗口.按钮1.标题 ＝ “连接服务”     _Log客户Duan (“创建失败”, “创建通信组件失败，请重启软件后再次尝试！”) 以上就是易语言怎么实现TCP客户端连接多个服务端源码写法所有内容了。感谢关注觅风论坛。