Hi,
wie ich das sehe gibt es von List in IdFTP.PAS zwei überladene Funktionen:
Delphi-Quellcode:
procedure TIdFTP.List;
begin
List(nil);
end;
procedure TIdFTP.List(const ASpecifier: string; ADetails: Boolean);
begin
List(nil, ASpecifier, ADetails);
end;
Ich habe das so gemacht um eine Datei einzulesen (D2009):
Delphi-Quellcode:
var
TFS: TFileStream;
begin
TFS := TFileStream.Create(cFTPSupplierFile, fmCreate);
try
// Verbinden:
try
IdFTP1.Connect;
Application.ProcessMessages;
IdFTP1.List;
IdFTP1.Get(cMyFile, TFS, False);
TFS.Seek(0, soFromBeginning); // an den Anfang setzen
.....
except
Result := False;
end;
finally
....
end;
end;
Um ein Verzeichnis einzulesen, schau Dir mal die Property "ListResult" an.
Gruß
Gerald