Hallo,
ich habe meine TidFTP-Komponente vom Formular in ein Datenmodul ausgelagert (
Indy Version 10.1.1).
Seitdem liefert mir aber u.a.
FTP.DirectoryListing immer nur nil. Woher kommt das? Die gesendeten
FTP-Kommandos kommen aber auf dem Server an.
Das Datenmodul wird auch vor dem Formular erzeugt.
Delphi-Quellcode:
Application.Initialize;
Application.MainFormOnTaskbar := True;
Application.Title := '';
Application.CreateForm(TDataModule1, DataModule1);
Application.CreateForm(TfrmMain, frmMain);
Application.Run;
Kann es evtl. daran liegen, dass das
Ftp.List-Kommando und
FTP.DirectoryListing in einer separaten
Unit aufgerufen werden?
Delphi-Quellcode:
ls := TStringList.Create;
DataModule1.ftp.ChangeDir(dir);
DataModule1.ftp.List(ls);
for i:=0 to DataModule1.ftp.DirectoryListing.Count-1 do
datei := DataModule1.ftp.DirectoryListing.Items[i].Filename;
Die Stringliste (ls) wird auch brav gefüllt. Ich bin mittlerweile ratlos.