当前位置: 查字典论文网 >> 使用indy的IdTcpServer,IdTcpclient传输文件

使用indy的IdTcpServer,IdTcpclient传输文件

格式:DOC 上传日期:2023-08-06 05:09:16
使用indy的IdTcpServer,IdTcpclient传输文件
时间:2023-08-06 05:09:16     小编:

使用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),'

全文阅读已结束,如果需要下载本文请点击

下载此文档

相关推荐 更多