Delphi Indy 聊天实例源代码.rar
DelphiIndy聊天实例,基于CS结构(服务端和客户端)的聊天程序实例,其实,我们不要仅限于聊天程序,在程序添加聊天功能也是聊天,本聊天采用Indy组件实现,你可了解一些Indy的用法。 关于CmdType:Integer;的定义:0:发送到指定人,1:发送到指定一批人,2:系统广播 另外还有登录判断消息的说明: AErrIDof 0:FCommError.ErrMsg:='聊天用户登录成功'; 1:FCommError.ErrMsg:='非法登录'; 2:FCommError.ErrMsg:='此聊天帐号已登录';