简单的UDP聊天工具概要设计说明书.doc

简单的UDP聊天工具概要设计说明书.doc

  1. 1、本文档共8页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
简单的UDP聊天工具概要设计说明书

简单的UDP聊天工具概要设计说明书 1、任务概述 1.1 项目命名 基于UDP协议的简单的网络聊天工具 1.2 目标 编写一个基于UDP协议的简单的网络聊天工具(以下简称网聊1.0),主要用于实验目的,暂不考虑实用性,聊天程序既是客户端,可以链接到远程主机,同时又是UDP服务器,可以响应计算机的链接要求,而且增加一个服务器,提供注册和监控的功能。 1.3 运行环境 Windows2000操作系统 1.4 需求概述 网聊1.0需实现 1、聊天双方限于文字的聊天模式; 2、实现多方聊天; 3、实时监控其他聊天对象的在线状态。 1.5 条件与限制 考虑到UDP协议的不可靠性,建议在运行稳定的局域网内运行。 1.6 开发工具 Delphi7.0 profesional AccessXP 1.6 参考资料 《Delphi7.0网络应用开发》,电子工业出版社,2003.1 《Delphi4.0编程技术内幕》,机械工业出版社,2002.1 2、总体设计 2.1 处理流程(见图1、图2) 2.2 功能模块及接口设计 客户端 【登录】 【主界面】 【设置】 【通讯模板】 服务器端 【用户登录注册】 【与客户端通讯】 【定时扫描】 【远程数据模板】 一、客户端 【通讯数据包格式】 //通信数据包格式 TMsgForServer = record MsgType:string[50];//信息包类型信息 CustomerID:string[50];//用户ID CustomerIP:string[50];//用户IP port:string[50];端口号 Key:string[50]; //密码 NickName:string[50];//别名 end; 【单元文件】 1、Login.pas(登录单元关键声明) TLoginFrm = class(TForm) private procedure ShowMainform; procedure Logincheck; procedure OpenConfigform(parameter:string); public ReceiveInfor:TMsgForServer; procedure setLocal0; procedure SetLocal1; 2、configForm.pas;(设置单元关键声明) TConfigFrm = class(TForm) private procedure ModifyCustomerInforModify;//修改、建立新的用户 procedure ConfigNetSetting; procedure AddFriend; public configReceiveInfor:TMsgForServer; 3、ClientForm.pas(主窗口单元关键声明) TClientFrm = class(TForm) public DownloadInfor:TMsgForServer; procedure SendMsg; procedure RefreshFriendsList; procedure RefreshChatFriend; procedure ReFreshLocalInfor;//更新ClientFrm窗口中状态条上本地信息 procedure AddNewFriend(MsgForServer:TMsgForServer); 4、CommunicationModul.pas(通讯单元关键声明) TCommunicationModulFrm = class(TForm) IdUDPClientForServer1: TIdUDPClient; procedure FormCreate(Sender: TObject); procedure IdUDPServer1UDPRead(Sender: TObject; AData: TStream; ABinding: TIdSocketHandle); private { Private declarations } public procedure SetLocal; procedure SetRemoteServer; //*****与登录相关的函数***** function refreshServerCustomerInfor(MsgForServer:TMsgForServer):boo

文档评论(0)

jiayou118 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档