Ftp.directorylisting

[-Volle-]

Servus ich hab mal wieder ein kleines Problem ...

wenn ich Verzeichnis Daten von einem Ftp Server laden will mach ich das ja so :

Delphi-Quellcode:

list:=Tstringlist.Create;
ftp.List(list,'',true);
for i:=0 to ftp.DirectoryListing.count-1 do
 begin
  dateisize[i]:=ftpserver.DirectoryListing.Items[i].Size;
  dateidatum[i]:=ftpserver.DirectoryListing.Items[i].ModifiedDate;
 end;
list.free;

das is jetzt nur ein kleines Beispiel, ich frage da noch mehr ab...
mein Problem besteht aber darin, dass ich bei dieser Zeile

Delphi-Quellcode:

for i:=0 to ftp.DirectoryListing.count-1 do

eine "EAccessViolation" bekomme...
Genaue Fehlermeldung:
"Zugriffsverletzung bei Adresse 00404894 in Modul 'bla.exe'. Lesen von Adresse 00000000"

was kann ich dagegen tun ??
Wenn ich die items nicht in einer Schleife, abfrage, sondern nur z.B.

ftp.directorylisting.items[0].size abfrage, dann kommt eben keine Fehlermeldung..
mir scheints so als sein directorylisting nicht initialisiert oder erstellt worden, wenn ich aber vor dem list

Delphi-Quellcode:

ftp.directorylisting.creat

eintippel, dann kommt der gleiche feher!...

Danke schonmal im Vorraus

[SirThornberry]

welche ftp-komponente benutzt du??

[-Volle-]

aeh hups habs ja mal wieder uebel verrafft :>
tuerlich benutz ich indy9, bzw idftp ...
lol

[-Volle-]

ich hab jetzt rausgefunden, dass es bei manchen FTP Servern funktioniert und bei manchen nicht... woran kann das liegen ?

[-Volle-]

also ich habs jetzt so gelöst, dass ich zuerst nur eine liste mit den dateinamen abfrage und dann in einer function alle anderen daten ab, das geht soweit...

weiss aber nicht, wiexo es nicht alles auf einmal geht, was mich immernoch interessieren wuerde, da meine Lösung EXTREM inperformant is...

[SirThornberry]

liegt daran das die verschiedenen ftp-server das list-commando unterschiedlich interpretieren, hamm sich wohl nicht alle programmierer an den standard gehalten. Manche ftp server liefern nur die Dateinamen beim listing zurück und andere eben noch die attribute dazu..

[-Volle-]

ja, aber wenn ich immer einzeln

Delphi-Quellcode:

ftp.list(list,dateiname,true);

für jeden dateinamen abruf und dann eben die dateidaten mit

Delphi-Quellcode:

ftp.directorylisting.items[0].size

abfrag, dann geht es...
das is ja grad das witzige/nervende :>

naja cYa

[shortbread]

Tja, das haben die Programmierer von Indy (meiner Meinung nach) verbockt.

Die Liste mit den Dir-Entries wird nämlich mit jedem Zugriff kürzer.
Einfach gesagt: Wenn man ein Entry abfragt, wird es danach automatisch gelöscht. Dämlich aber nicht zu ändern.

Meine Lösung:

Delphi-Quellcode:

 while directorylisting.count>0 do begin
  liste1.items.add(directorylisting.items[0]);
 end;

Mit liste1.items kann man dann arbeiten, ohne Angst vor Verflüchtigung haben zu müssen. :lol:
Hab ich nach 7,5 Stunden Frustation unter Schmerzen rausgefunden.

Hoffe, das hat die Klarheiten beseitigt.

Gruß, ShortbRead

[-Volle-]

tHx ich tests mal ... :>

[Unplugged]

Hi,

Delphi-Quellcode:

IdFTP1.DirectoryListing.Items[x].FileName

Mir ist aufgefallen, dass der Rückgabe-String fehlerhaft ist, sobald ein Leerzeichen am Ende des Dateinamens zu finden ist. Kann das jemand bestätigen bzw. weiß jemand, ob es einen Fix dafür schon gibt?

PS: Ich nutze derzeit Indy9