TIdFTP Listenindex überschreitet maximum

**0NyX**

Hallo DP-User,

nachdem ich mich zwei Jahre lang leider nicht mehr mit delphi beschäftigt habe, sitze ich seit gestern wieder begeistert davor

Derzeit arbeite ich an einem kleinen Programm in dem ich auch die TIdFTP Componente verwenden will / muss.
Doch leider komme ich seit gut zwei Stunden einfach nicht mehr weiter und hoffe darauf, dass mir vielleicht einer von euch helfen kann.

Es scheitert derzeit an der List funktion.
Jedesmal, wenn ich idftp1.list aufrufe, kommt folgender Fehler:

---------------------------
Benachrichtigung über Debugger-Exception
---------------------------
Im Projekt upload.exe ist eine Exception der Klasse EListError mit der Meldung 'Listenindex überschreitet das Maximum (1)' aufgetreten.
---------------------------
Anhalten Fortsetzen Hilfe
---------------------------

Meine Verwendete Umgebung:
RAD Studio 2010

Indy Version:
10.5.5

Mein Programmcode für die Verbindung:

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TForm1.BtnConnectClick(Sender: TObject);

begin

  lblftpstatus.Caption:='Setze Parameter';

  IdFTP1.Passive:=CheckBoxPassive.Checked;

  IdFTP1.Host := EdtServerIp.Text;

  IdFTP1.Port := StrToInt(EdtPort.Text);

  IdFTP1.Username := EdtUsername.Text;

  IdFTP1.Password := EdtPasswort.Text;

  lblftpstatus.Caption:='Baue verbindingung auf . . .';

  IdFTP1.Connect;

  lblftpstatus.Caption:='Wechsel Ordner . . .';

  IdFTP1.ChangeDir(EdtPath.Text);

  if IdFTP1.Connected=true then begin

    lblftpstatus.Caption:='Connected.';

    IdFTP1.List(DirectoryListBox.Items);

  end else begin

    lblftpstatus.Caption:='Verbindung fehlgeschlagen.';

  end;

end;

Würde mich echt freuen, wenn mir einer von euch helfen könnte.

Viele Grüße

--------------------------
Hat sich grade erledigt.
Das Problem lag nicht an dem List sondern an das, was ich beim OnWork veranstaltet habe.
Schuldigt nun dieses unnützen Thread

TIdFTP Listenindex überschreitet maximum

TIdFTP Listenindex überschreitet maximum

Forumregeln