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:
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