FTP и список файлов

[drdead]

Коннект к серваку нормальный, все ок. но проблема, когда считываю список файлов точнее папок(их в корне 3)

IdFTP1.List(ListBox1.Items,'',false);

Пинком направьте в сторону ошибки.
при коннекте через фтп менеджеры точек нет(

[drdead]

 idftp1.Connect;
 listbox1.Clear;
      AssErt(idftp1.Connected);
             if idftp1.connected then
       begin
       connect.Enabled:=false;
       disconnect.Enabled:=true;
       statusbar1.SimpleText:='connected to '+ idftp1.Host;
       memo1.Lines.Add('connected to '+ idftp1.Host) ;
       edit1.Enabled:=false;
       button1.Enabled:=true;
edit2.Enabled:=false;
maskedit1.Enabled:=false;
IdFTP1.List(ListBox1.Items,'',false);

полный код коннекта

[Пепел Феникса]

это спец папки.
.. это папка выше текущей(её родитель)
. это сама текущая папка.
это просто надо вырезать руками.

[drdead]

Понял. спасибо. как я понял в цикле сравнить содержимое строк в ListBox1.Items и удалить ".." и "."

[Stilet]

в цикле сравнить содержимое строк в ListBox1.Items и удалить ".." и "."

Проще:

with ListBox1.Items do begin
 Delete(indexof('.'));Delete(indexof('..'));
end;

Должно сработать.