INDY-Upload | Nur max 2 Dateien hochgeladen

[Svenkan]

Hey Leute!
Leider werden bei mir momentan nur max. 2 Dateien hochgeladen.
MultiSelect im Opendialog ist True.

Delphi-Quellcode:

procedure TForm1.BtFileUploadClick(Sender: TObject);
var Ini: TIniFile;
    dirname,password,url,username: String;
begin
  if OpenDialog2.Execute then
 try
    Ini:=TIniFile.Create(ExtractFilePath(ParamStr(0))+'conf.ini');
   username:=Ini.ReadString('FTP-Daten','Username','');
   password:=Ini.ReadString('FTP-Daten','Password','');
   url:=Ini.ReadString('FTP-Daten','URL','');
   dirname:=Ini.ReadString('FTP-Daten','Ordner','');

  IdFTP1.Username := username;
  IdFTP1.Password := password;
  IdFTP1.Host := url;
  IdFTP1.Connect;
  IdFTP1.ChangeDir(dirname);
  IdFTP1.Put(OpenDialog2.FileName,
  ExtractFileName(OpenDialog2.FileName));
  IdFTP1.Quit;
   finally
    Ini.Free;
end;
end;

Kann mir dabei jemand helfen?