文件名称:Server___SendFile___Client
文件大小:519KB
文件格式:RAR
更新时间:2014-01-02 09:51:34
客户端与服务器传输文件源码,delphi
{ 1,在服务器端如何维护已经登录的用户列表; 2,反向通讯,通过服务器端给客户端发送文件; 3,实现客户端与服务器端的Chat聊天功能(稍加改动可转化为C->S->C的聊天程序) 4,如何使用IdTCPServer和IdTCPClient控件 5,初步实现线程命令方式,在传送文件的时候不会让服务器端停止响应 本Demo通过D7+Indy Snapshot 版本编译通过,请不要使用任何Delphi自带的Indy编译 (包括BDS2006,因为这些Delphi自带的版本都有Bug),如想下载最新的Indy Snapshot包, 请从本群内空间下载,或去2ccc.com搜索(2ccc.com上可能不是最新的)。 谢谢合作,本群已经满员(100人),如您想加入,请帮助扩充人数。谢谢!} program Client; uses Forms, Unit1 in 'Unit1.pas' {Form1}; {$R *.res} begin Application.Initialize; Application.CreateForm(TForm1, Form1); Application.Run; end.
【文件预览】:
Client
----Client.identcache(121B)
----Client.exe(531KB)
----Client.cfg(434B)
----Client.dpr(1010B)
----Unit1.dcu(11KB)
----Unit1.dfm(2KB)
----Client.res(876B)
----Unit1.pas(7KB)
----Client.dproj(3KB)
----Unit1.ddp(51B)
----Client.dof(12KB)
Server
----Server.identcache(121B)
----Unit1.dcu(20KB)
----Server.dof(12KB)
----Server.dpr(1010B)
----Unit1.dfm(3KB)
----Server.cfg(434B)
----Unit1.pas(15KB)
----Server.dproj(3KB)
----Server.exe(684KB)
----Server.res(876B)
----Unit1.ddp(51B)