模块名称:TCP网络服务器模块 
作者:云外归鸟 
版本:1.1 
 
可建立多个网络连接的服务器.利用标签的反馈事件来响应各事件. 
------------------------------ 
 
.版本 2 
 
.子程序 TCP服务器_绑定端口, 逻辑型, 公开 
.参数 端口, 短整数型 
 
.子程序 TCP服务器_初始化, 逻辑型, 公开, 必须调用的子程序,在窗口创建完毕事件里 
.参数 窗口, 窗口 
 
.子程序 TCP服务器_断开连接, , 公开 
.参数 套接字句柄, 整数型 
 
.子程序 TCP服务器_发送数据, , 公开 
.参数 套接字句柄, 整数型 
.参数 数据, 字节集, 参考 
 
.子程序 TCP服务器_接受请求, 整数型, 公开, 返回的是客户端的套接字,可用TCP服务器_取回客户()取回地址 
.参数 套接字句柄, 整数型 
 
.子程序 TCP服务器_开始监听, 逻辑型, 公开 
 
.子程序 TCP服务器_取回客户, 文本型, 公开 
.参数 套接字句柄, 整数型 
 
.子程序 TCP服务器_取回数据, 字节集, 公开 
.参数 套接字句柄, 整数型 
 
.子程序 客户断开事件反馈标签, , 公开, 该标签的反馈事件的参数一为套接字句柄 
.参数 反馈标签, 标签 
 
.子程序 客户请求事件反馈标签, , 公开, 该标签的反馈事件的参数一为套接字句柄 
.参数 反馈标签, 标签 
 
.子程序 数据抵达事件反馈标签, , 公开, 该标签的反馈事件的参数一为套接字句柄 
.参数 反馈标签, 标签 
 
 
11043293170[下载].rar
 
 
 |