没事无聊把服务器的例子写了下 供萌新看 代码属于写的很明了的
窗口程序集名 | 保 留 | 保 留 | 备 注 | 窗口程序集_启动窗口 | | | | 变量名 | 类 型 | 数组 | 备 注 | 客户 | 文本型 | | 如果真 (客户1. 连接 (“127.0.0.1”, 15987 ) = 假)调试输出 (“与服务器连接失败”)返回 ()调试输出 (“与服务器连接成功”)如果真 (编辑框1.内容 = “连接”)如果真 (客户1. 连接 (“127.0.0.1”, 15987 ) = 假)调试输出 (“与服务器连接失败”)返回 ()调试输出 (“与服务器连接成功”)客户1. 发送数据 (到字节集 (编辑框1.内容 )) 编辑框2.内容 = “”编辑框2. 加入文本 (到文本 (服务器1. 取回数据 ()) )服务器1. 发送数据 (客户, 编辑框2.内容, )调试输出 (客户 )编辑框1.内容 = “”接收的信息 = 到文本 (客户1. 取回数据 ()) 编辑框1. 加入文本 (接收的信息 )如果真 (接收的信息 = “信息框”)信息框 (接收的信息, 0, , )如果真 (接收的信息 = “退出”)客户1. 断开连接 ()客户 = 服务器1. 取回客户 ()编辑框2. 加入文本 (到文本 (服务器1. 取回客户 ()) + “进入服务器”)编辑框2. 加入文本 (到文本 (服务器1. 取回客户 ()) + “退出服务器”)
窗口 添加 一个服务器 一个客户 2个编辑框 2个按钮 然后 直接代码黏贴进去就行
|