IdFTP: Alles auflisten

[jfheins]

Hi,
guck' mal hier: http://www.delphipraxis.net/153961-i...satzinfos.html Post #9

Das reduziert sich dann (wenn man meinen Code abzieht) auf:

Delphi-Quellcode:

procedure xyz.CreateDirectoryListing;
var
  i: Integer;
begin
    FFtp.SendCmd('TYPE A');

    FFtp.List (nil, '-a', True);

    for i := 0 to Pred (FFtp.ListResult.Count) do
      CreateItemFromFileInfo (FTP.DirectoryListing[i]);
end;

procedure xyz.CreateItemFromFileInfo(const FileInfo: TIdFTPListItem);
var
  ListItem: TListItem;
begin
  // Mach was mit FileInfo, z.B. mittels Listitem in eine Listview tun
end;

TListItem ist nur relevant, wenn du das Gedöns in eine Listview schmeißen möchtest.
Die Shell* Komponenten und FTP kannste knicken. Die operieren nur auf dem lokalen Dateisystem

Das Rootverzeichnis des FTP Servers ist normalerweise "/" - und da solltest du auch nach der Anmeldung direkt drinnen sein.