INDY的FTP控件中DOWN文件的时候,怎么检测下载的文件不存在?(50分)

  • 主题发起人 主题发起人 jjweb
  • 开始时间 开始时间
J

jjweb

Unregistered / Unconfirmed
GUEST, unregistred user!
在INDY的FTP控件中DOWN文件的时候,怎么检测下载的文件是否存在?
 
用一个filelistbox把当前目录下有的文件列表,和要下载的文件比较
 
function FTPFileExists(str: string): Boolean;
var
sizeofFTPfile: integer;
begin
sizeofFTPfile := idFTP1.Size(str);
if sizeofFTPfile > 0 then
begin
Result := True;
// ShowMessage('FTP的文件存在。');
Exit;
end;
ShowMessage('FTP的文件不存在。');
Result := False;
end;
 
后退
顶部