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

lhh 2003-07-09 04:44:46

我使用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的例程在我这里也报这个错误，请问各位是什么原因呀，我在线等待，谢谢!!

...全文

51 3 打赏收藏转发到动态举报

写回复

用AI写文章

3 条回复

切换为时间正序

请发表友善的回复…

发表回复

lihh 2003-07-10

打赏
举报

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

ltysunde 2003-07-09

打赏
举报

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地址试试！

dragon191 2003-07-09