教育资源为主的文档平台

当前位置: 查字典文档网> 所有文档分类> 论文> 其他论文> 使用indy的IdTcpServer,IdTcpclient传输文件

使用indy的IdTcpServer,IdTcpclient传输文件

上传者:网友
|
翻新时间:2023-08-06

使用indy的IdTcpServer,IdTcpclient传输文件

使用indy的IdTcpServer,IdTcpclient传输文件

接受部分(有个用户和密码check,你取消就可以)

procedure TTCP_Server.IdTCPServerExecute(AThread: TIdPeerThread);

var

FStream : TFileStream;

FileName : String;

CmdStr : String;

begin

CmdStr :=AThread.Connection.ReadLn();

if CompareStr(Copy(CmdStr,1,

6),'

下载文档

版权声明:此文档由查字典文档网用户提供,如用于商业用途请与作者联系,查字典文档网保持最终解释权!