欢迎来到天天文库
浏览记录
ID:18507869
大小:164.50 KB
页数:8页
时间:2018-09-18
《简单的udp聊天工具概要设计说明书》由会员上传分享,免费在线阅读,更多相关内容在学术论文-天天文库。
1、简单的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
2、.6开发工具Delphi7.0profesionalAccessXP1.6参考资料《Delphi7.0网络应用开发》,电子工业出版社,2003.1《Delphi4.0编程技术内幕》,机械工业出版社,2002.12、总体设计2.1处理流程(见图1、图2)2.2功能模块及接口设计客户端【登录】【主界面】【设置】【通讯模板】服务器端【用户登录注册】【与客户端通讯】【定时扫描】【远程数据模板】一、客户端【通讯数据包格式】//通信数据包格式TMsgForServer=recordMsgType:string[50];//信息包类型信息CustomerID:string[50
3、];//用户IDCustomerIP:string[50];//用户IPport:string[50];端口号Key:string[50];//密码NickName:string[50];//别名end;【单元文件】1、Login.pas(登录单元关键声明)8TLoginFrm=class(TForm)privateprocedureShowMainform;procedureLogincheck;procedureOpenConfigform(parameter:string);publicReceiveInfor:TMsgForServer;procedure
4、setLocal0;procedureSetLocal1;2、configForm.pas;(设置单元关键声明)TConfigFrm=class(TForm)privateprocedureModifyCustomerInforModify;//修改、建立新的用户procedureConfigNetSetting;procedureAddFriend;publicconfigReceiveInfor:TMsgForServer;3、ClientForm.pas(主窗口单元关键声明)TClientFrm=class(TForm)publicDownloadInfor
5、:TMsgForServer;procedureSendMsg;procedureRefreshFriendsList;procedureRefreshChatFriend;procedureReFreshLocalInfor;//更新ClientFrm窗口中状态条上本地信息procedureAddNewFriend(MsgForServer:TMsgForServer);4、CommunicationModul.pas(通讯单元关键声明)TCommunicationModulFrm=class(TForm)IdUDPClientForServer1:TIdUDP
6、Client;procedureFormCreate(Sender:TObject);procedureIdUDPServer1UDPRead(Sender:TObject;AData:TStream;ABinding:TIdSocketHandle);private{Privatedeclarations}publicprocedureSetLocal;procedureSetRemoteServer;//*****与登录相关的函数*****functionrefreshServerCustomerInfor(MsgForServer:TMsgForServer
7、):boolean;functionLoginServer(MsgForServer:TMsgForServer):boolean;//*****发送聊天信息给好友*****procedureSendMsgToOther(MsgForServer:TMsgForServer);//*****刷新好友状态信息******procedureRefreshfriendStatus(MsgForServer:TMsgForServer);//*****更新好友信息*****procedureRefreshFriendInfor(MsgForServer:TMsgForSe
8、rver)
此文档下载收益归作者所有