+ -
当前位置:首页 → 问答吧 → Indy IdFTP组件的ChangeDir方法不起作用,我哪里弄错了?请高手指教。

Indy IdFTP组件的ChangeDir方法不起作用,我哪里弄错了?请高手指教。

时间:2011-09-20

来源:互联网

代码如下:
var
  count, i: Integer;
begin
  ifFTP.ChangeDir('htdocs');
  //在标题栏显示当前目录,确实是:/htdocs
  Self.Caption := ifFTP.RetrieveCurrentDir;
  //清空文件列表(ListBox组件)
  lbFileList.Items.Clear;
  count := ifFTP.DirectoryListing.Count;
  for i := 0 to count - 1 do
  begin
  lbFileList.Items.Add(ifFTP.DirectoryListing.Items[i].FileName);
  end;
end;

这段代码的本意是要获得FTP服务器上指定目录中的所有文件,但是,程序运行之后,获得的确依旧是根目录中的文件。在网上查了很多代码,也照做了,均无用。本人用Delphi 2010中自带的Indy组件。请高手帮我一下,谢谢!

作者: Terony   发布时间: 2011-09-20

没有人会吗?沙发只好自己坐了,:-D.

作者: Terony   发布时间: 2011-09-20