Indy IdFTP组件的ChangeDir方法不起作用,我哪里弄错了?请高手指教。
代码如下:
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组件。请高手帮我一下,谢谢!