doch ich hab ne idee (ein jahr später ;-))
DirectoryListing ist leer weil du keinen parser für das directory-format hast.
binde mal folgende units mit ein (in der uses klausel):
Code:
IdFTPListParseAS400
IdFTPListParseBase
IdFTPListParseBullGCOS7
IdFTPListParseBullGCOS8
IdFTPListParseCiscoIOS
IdFTPListParseDistinctTCPIP
IdFTPListParseEPLF
IdFTPListParseHellSoft
IdFTPListParseKA9Q
IdFTPListParseMicrowareOS9
IdFTPListParseMPEiX
IdFTPListParseMusic
IdFTPListParseMVS
IdFTPListParseNCSAForDOS
IdFTPListParseNovellNetware
IdFTPListParseNovellNetwarePSU
IdFTPListParseOS2
IdFTPListParseStercomOS390Exp
IdFTPListParseStercomUnixEnt
IdFTPListParseTandemGuardian
IdFTPListParseTOPS20
IdFTPListParseTSXPlus
IdFTPListParseUnix
IdFTPListParseVM
IdFTPListParseVMS
IdFTPListParseVSE
IdFTPListParseVxWorks
IdFTPListParseWfFTP
IdFTPListParseWindowsNT
IdFTPListParseWinQVTNET
IdFTPListParseXecomMicroRTOS
damit registieren sich alle verfügbaren parser.
bei meinem projekten ist meist nur der IdFTPListParseUnix und IdFTPListParseWindowsNT notwendig.
Delphi-Quellcode:
memo1.Clear;
idFTP1.List;
for i:=0 to idFTP1.DirectoryListing.Count-1 do
with idFTP1.DirectoryListing.Items[i] do
memo1.lines.add( formatdatetime('dd.mm.yyyy hh:nn:ss', ModifiedDate)+' '+FileName+' '+inttostr(Size) );
welches format du brauchst findest du in IdFTP1.SystemDesc raus.