Ok, ich schreib jetzt mal bissel Code ausm Kopf:
Delphi-Quellcode:
var
i: integer;
begin
idFTP.Host := '....';
idFTP.Port := 21;
idFTP.Username := '....';
idFTP.Password := '....';
idFTP.Connect;
idFTP.ChangeDir ('....'); //Glaube, so hieß das
idFTP.Noop; //Würd ich einfach mal machen
for i:=0 to ListBox1.Items.Count-1 do
begin
idFTP.Put ('.....', ListBox1.Items[i]);
idFTP.Noop;
end;
idFTP.Disconnect;
end;
Also, ich hab bei mir immer mal ein "Noop" dazwischen gemacht, um sicherzugehen, dass 1. Connecten noch is und 2. der mit dem vorigen fertig ist !