FTP（TIdFTP控件）的简单问题，散分啦,在线等待中.....

[lhh]

我使用Indy的TIdFTP控件时使用以下代码：
IdFTP1.Host:='lhh';
IdFTP1.Username:='administrator';
IdFTP1.Password:='lihh9705';
IdFTP1.Connect;
FileList:=TStringList.Create;
IdFTP1.List(FileList);
到了IdFTP1.List(FileList);时报错：
“project test.ext raised exception class EIDconnClosedGracefully connection closed gracefully”.
我可是对着indy的ftp例子写的程序，而且indy的例程在我这里也报这个错误，请问各位是什么原因呀，我在线等待，谢谢!!

[dragon191]

up

[ltysunde]

procedure TForm1.Button1Click(Sender: TObject);
var
filelist : Tstringlist;
begin
idftp1.Host:='192.168.0.25';
idftp1.Port:=2100;
idftp1.Username:='username';
idftp1.Password:='password';
idftp1.Connect;
FileList:=TStringList.Create;
IdFTP1.List(filelist);
Memo1.Text:=filelist.Text;
idftp1.Free;
end;


测试了一下通过。
host那里填写ip地址试试！

[lihh]

其实你的程序没有错误呀，请检查你的机器软件配置或者直接运行exe文件