IdFTP

 
//连接 
    IdFTP1.Host := '192.168.1.18';
    IdFTP1.Port := 21;

    IdFTP1.Username := 'update';
    IdFTP1.Password := 'update';

    IdFTP1.Connect();

//更改目录
  IdFTP1.ChangeDir('test2/test222');

// 该函数返回当前目录名
var
   str: string;
--
  str := IdFTP1.RetrieveCurrentDir;

//上一次目录
  IdFTP1.ChangeDirUp;

{ 列出当前目录所有文件和子目录及其属性
  procedure List(ADest: TStrings; const ASpecifier: string; const ADetails: boolean);
列出当前目录所有文件和子目录及其属性
参数:
ADest: TStrings
保存文件及子目录的返回结果
const ASpecifier: string = ''
文件掩码,用于列出符合条件的文件
const ADetails: boolean = true
包含文件和子目录属性
}

var 
   st: TStringList;
--
  st := TStringList.Create;
  IdFTP1.List(st, '', true);

}


已标记关键词 清除标记
相关推荐
©️2020 CSDN 皮肤主题: 大白 设计师:CSDN官方博客 返回首页