Dateien von einem Ftp server runter/hochladen

[Time2Play]

Ok habs so probiert und es öffnet sich auch ein savedialog, ich hab einen namen eingegeben und wollte es runterladen, dann kam aber ein EidProtocolReplyError. Meldung: "File not found."

Muss ich noch den Transfertyp angeben oder wieso findet er die File net?

Hier nochmal der bisherige Code:

procedure TForm1.connectbutClick(Sender: TObject);
var i:integer;
name:string;
begin
if idftp1.connected=false then begin
idftp1.Username:='admin';
idftp1.password:='******';
idftp1.Host:='127.0.0.1';
idftp1.connect;
IdFTP1.List(ListBox1.Items);
for i:=0 to Listbox1.Count-1 do begin
name:=listbox1.Items[i];
listbox2.Items.Add(name);
if SaveDialog1.Execute then
IdFTP1.Get(Name, SaveDialog1.FileName, true);
end
end;
end;

EDIT: Also ich sehe wenn sich der savedialog öffnet auch genau die erste File in der Listbox 2.
Also mit der for und der if schleife klappt alles, nur das runterladen funzt noch net ganz.

Achja kann ich das ganze auch runterladen ohne das sich ein savedialog öffnet?
Er es also einfach unter nem bestimmten Namen speichert.
Also vllt: savename:=name+i;
Dann hätte ich bei jeder Datei automatisch n anderen Namen und es würde sich nix überschreiben.

Sry bin noch n Noob was Delphi angeht.