Anzahl von Dateien in FTP-Verzeichnis auslesen in Delphi 7

[masterchris_99]

Hallo,

Ich habe auch das Problem das mein Prog hängen bleibt sobald keine passende Datei im Ordner liegt.

Zitat:

gsIdProductName = 'Indy'; {do not localize}
gsIdVersion = '9.00.10'; {do not localize}

Delphi 7


Try Except hat nichts gebracht

Delphi-Quellcode:

var ftplist: TStrings;

ftplist := TStringList.Create;

  try
    IdFTP1.List(ftplist,'*.exp',false);
  except
    Raise;
  end;

Also wenn eine Datei vorhanden ist ist alles gar kein Problem aber es bleibt hängen wenn keine Datei drinliegt.
mit und ohne try except block.

Was kann ich tun?