电脑桌面
添加小米粒文库到电脑桌面
安装后可以在桌面快捷访问

易语言简单局域网聊天代码(客户服务器组件编写)

易语言简单局域网聊天代码(客户服务器组件编写)_第1页
1/11
易语言简单局域网聊天代码(客户服务器组件编写)_第2页
2/11
易语言简单局域网聊天代码(客户服务器组件编写)_第3页
3/11
客户机代码: . 版本 2 .支持库 shell .支持库 xplib .程序集 窗口程序集1 .程序集变量 文件号1, 整数型 .程序集变量 文件长度, 整数型 .程序集变量 发送内容, 字节集 .程序集变量 文件名, 文本型 .程序集变量 文件号2, 整数型 .子程序 _按钮1_被单击 .局部变量 现在时间, 文本型 .如果 (编辑框7.内容 = “1”) .如果 (编辑框6.内容 ≠ “”) .如果 (编辑框2.内容 ≠ “”) 客户 1.发送数据 (“聊天” + 编辑框2.内容) 现在时间 = 到文本 (取年份 (取现行时间 ())) + “/” + 到文本 (取月份 (取现行时间 ())) + “/” + 到文本 (取日 (取现行时间 ())) + “/” + 到文本 (取小时 (取现行时间 ())) + “:” + 到文本 (取分钟 (取现行时间 ())) + “:” + 到文本 (取秒 (取现行时间 ())) 编辑框1.内容 = 编辑框1.内容 + “【本机】” + 现在时间 + #换行符 + “ ” + 编辑框2.内容 + #换行符 编辑框2.内容 = “” .否则 信息框 (“发送消息不能为空”, 48, “提示”) .如果结束 .否则 信息框 (“服务器 IP 地址不能为空”, 48, “提示”) .如果结束 .否则 信息框 (“服务器未连接”, 48, “提示”) .如果结束 .子程序 _按钮 2_被单击 .如果 (编辑框6.内容 ≠ “”) .如果 (编辑框8.内容 ≠ “”) .如果 (客户 1.连接 (编辑框6.内容, 1991) = 真) 播放 MP3 (1, “xlj.mp3”) 编辑框1.内容 = 编辑框1.内容 + “连接:” + 编辑框6.内容 + “成功” + #换行符 按钮 2.禁止 = 真 编辑框7.内容 = “1” 客户 1.发送数据 (“昵称” + 编辑框8.内容) .否则 播放 MP3 (1, “lk.mp3”) 编辑框1.内容 = 编辑框1.内容 + “连接:” + 编辑框6.内容 + “失败” + #换行符 .如果结束 .否则 信息框 (“请填写你的昵称”, 48, “提示”) .如果结束 .否则 信息框 (“请填写要连接的IP 地址”, 48, “提示”) .如果结束 .子程序 _客户1_数据到达 .局部变量 接收内容, 文本型 .局部变量 现在时间, 文本型 .局部变量 发送进度, 整数型 接收内容 = 到文本 (客户1.取回数据 ()) 现在时间 = 到文本 (取年份 (取现行时间 ())) + “/” + 到文本 (取月份 (取现行时间 ())) + “/” ...

1、当您付费下载文档后,您只拥有了使用权限,并不意味着购买了版权,文档只能用于自身使用,不得用于其他商业用途(如 [转卖]进行直接盈利或[编辑后售卖]进行间接盈利)。
2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。
3、如文档内容存在违规,或者侵犯商业秘密、侵犯著作权等,请点击“违规举报”。

碎片内容

易语言简单局域网聊天代码(客户服务器组件编写)

确认删除?
VIP
微信客服
  • 扫码咨询
会员Q群
  • 会员专属群点击这里加入QQ群
客服邮箱
回到顶部