各位好~小弟在用delphi编写ftp时,在获取列表时(IdFTP.List)经常死掉,请问如何解决,或者如何跳过? 多谢,邮箱[email protected] 
msn:[email protected] 
多谢!!

解决方案 »

  1.   

    如果确保不是ftp服务器的问题和网络问题,请参考我的代码:我的ftp软件一直用的很好。
    var
      tr : Tstrings;
    begin
      tr := TStringlist.Create;
      try
        IdFTP1.Connect(True,8000);  //连接到ftp,默认自动登录,连接超时时间8秒
      except
        MessageBox(handle, '连接不上 ftp 服务器!', '提示信息', MB_OK or MB_ICONINFORMATION );
        Exit;
      end;  if not IdFTP1.Connected then
        Exit;
      //IdFTP1.ChangeDir('test'); //进入到client子目录
      IdFTP1.List(tr); //得到client目录下所有文件列表
      tr.Free;
      ……
    end;