Punkt 1 is kein Problem, hab alles in meiner Listbox aufgelistet. Nur Punkt 2 und 3 klappt net wirklich.
procedure TForm1.connectbutClick(Sender: TObject);
var i:integer;
name:string;
begin
if idftp1.connected=false then begin
idftp1.Username:='admin';
idftp1.password:='password';
idftp1.Host:='127.0.0.1';
idftp1.connect;
IdFTP1.List(ListBox.Items);
end
end;
Das is bisher der Code, ich weis nich genau wie ich die Namen der einzelnen Dateien rausfinde, dachte zuerst an sowas:
for i:=0 to Listbox.Count-1 do begin
name:=listbox.Items.Strings[i];
IdFTP1.Get(Name, SaveDialog1.FileName, true);
end
Aber dann kommt dieser Error:
Im Project Project1.exe ist eine
Exception der Klasse EFCreateError aufgetreten. Meldung: 'Datei "" kann nicht erstellt werden. Das System kann den angegebenen Pfad nicht finden'.