源码很简单,就是使用一下inftp组件,把Tencoding,TIdtxtEndong的几个参数试了个遍,还是乱码,请高手帮忙解决。
procedure TForm1.Button1Click(Sender: TObject);
var
 ls:Tstringlist;
 i:integer;
 begin
  ls:=Tstringlist.Create;  idftp1.Host:='ftp.trueice.net';
  idftp1.Username:='upload';
  idftp1.Password:='upload';
  idftp1.Connect;
  idftp1.List(nil);
  for i := 0 to idftp1.DirectoryListing.Count - 1 do
    begin      listbox1.Items.Add(utf8toansi(idftp1.DirectoryListing[i].FileName));
    end;end;procedure TForm1.IdFTP1Connected(Sender: TObject);
var
cod:integer;
begin
  idftp1.IOHandler.DefStringEncoding:=TEncoding.Default;end;

解决方案 »

  1.   

    为什么要utf8toansi,这应该和你的编码有关,如果没有编码就不用转换
      

  2.   

    不用utf8toansi,其他参数都用了,也是乱码,用了还是乱码。晕了,网上有文章说用了其中的一个就可以正常了,我的用了,还是不行。
      

  3.   

    这个应该与Ftp服务器编码设置有关,查看一下原FTP的编码,然后用相对应的解码函数
      

  4.   

    我也是遇到一样的问题,几个TIdtxtEndong参数都试过,列出中文目录或文件名还是乱码
      

  5.   

    2010-05-14 17:04:40.765      正在连接服务器 ftp.trueice.net......
    2010-05-14 17:04:41.000      域名解析成功 [166.111.111.196]......
    2010-05-14 17:04:41.156      服务器连接成功,等待应答消息......
    2010-05-14 17:04:41.296      220 Trueice FTP Server Ready
    2010-05-14 17:04:41.296      USER upload
    2010-05-14 17:04:41.453      230-               
    2010-05-14 17:04:41.453      230-               ==================================================  
    2010-05-14 17:04:41.453      230-                     Trueice的FTP站点欢迎您的光临。
    2010-05-14 17:04:41.453      230-      =====================================================================
    2010-05-14 17:04:41.453      230-                   空间升级至640G,力争成为清华最好的流行音乐站点  
    2010-05-14 17:04:41.453      230-     WWW方式:  
    2010-05-14 17:04:41.453      230-     PopMusic Online :http://music.zixia.net http://music.trueice.net  
    2010-05-14 17:04:41.453      230-     Music Video Online : http://mvnet.trueice.net/  --只对清华北大开放
    2010-05-14 17:04:41.453      230-     感谢清华大学网管会提供校内镜像FTP ftp://166.111.158.99/ 请校内用户由此下载
    2010-05-14 17:04:41.468      230-     感谢 东北财经大学网管中心 为本站提供教育网镜像服务器 ftp://iris.trueice.net/ 
    2010-05-14 17:04:41.468      230-
    2010-05-14 17:04:41.468      230-                     "独乐乐,与人乐乐,孰乐?"
    2010-05-14 17:04:41.468      230-                我们将以以共同的爱好为基础,努力提供精品服务!!
    2010-05-14 17:04:41.468      230-      =====================================================================
    2010-05-14 17:04:41.468      230- 管理员:
    2010-05-14 17:04:41.468      230-                Harlem@SMTH & asaga@SMTH & zhuqi336@SMTH & acao@SMTH & fal@SMTH
    2010-05-14 17:04:41.468      230-                                    -- Chinese Pop & Pure Music & Others
    2010-05-14 17:04:41.468      230-                BrianGeorge@SMTH  & choral@SMTH & capa@SMTH & jovi00@SMTH
    2010-05-14 17:04:41.468      230- & kunimi@SMTH
    2010-05-14 17:04:41.468      230-                                    -- English Pop & OST 
    2010-05-14 17:04:41.468      230-
    2010-05-14 17:04:41.468      230- 可以根据其ID到水木清华BBS与他们联系
    2010-05-14 17:04:41.468      230-      =================================-注意事项===========================
    2010-05-14 17:04:41.468      230-          1.请勿用多线程下载,以免影响其他用户的使用
    2010-05-14 17:04:41.468      230-          2.请勿上载违反国家法律的任何文件
    2010-05-14 17:04:41.468      230-          3.上载可以使用ftp.trueice.net 8021端口 用户名:upload,密码:upload
    2010-05-14 17:04:41.468      230-                   使用中如有任何问题,请联系系统管理员 (trueice@trueice dot net)
    2010-05-14 17:04:41.468      230-
    2010-05-14 17:04:41.484      230-     =====================================================================
    2010-05-14 17:04:41.484      230-          本站允许您的区域同时连接数为 180 ,目前已有 36 个连接来自您的区域  
    2010-05-14 17:04:41.484      230-     =====================================================================
    2010-05-14 17:04:41.484      230 Anonymous user logged in
    2010-05-14 17:04:41.484      SYST
    2010-05-14 17:04:41.625      215 UNIX Type: L8
    2010-05-14 17:04:41.625      CWD .
    2010-05-14 17:04:41.781      250 OK. Current directory is /
    2010-05-14 17:04:41.781      PWD
    2010-05-14 17:04:41.921      257 "/" is your current location
    2010-05-14 17:04:41.921      TYPE A
    2010-05-14 17:04:42.437      200 TYPE is now ASCII
    2010-05-14 17:04:42.437      PASV
    2010-05-14 17:04:42.968      227 Entering Passive Mode (166,111,111,196,195,110)
    2010-05-14 17:04:42.968      LIST -la
    2010-05-14 17:04:43.250      150 Accepted data connection
    2010-05-14 17:04:43.531      226 ls OK
    登陆信息如上,我该使用什么参数?
      

  6.   

    终于找到了,呵呵
    idFTP1.IOHandler.DefStringEncoding:=tencoding.Default;
    加ansitoutf8转换一下就可以了。
      

  7.   

    我靠  我这再隔一年问这问题。 现在用delphi ex2 也有这问题 按照lz说的 测试了 还是会乱码啊。