Crie os IDFTP em tempo de execução,e para cada,atribua um item
ex:
procedure TForm1.Button1Click(Sender: TObject);
var
id1: TIDFtp;
hostftp,usuario,senha: string;
tryagain:
begin
hostftp:= 'google.com.br';
usuario:= 'anonymous';
senha:= '001';
id1:= TIDFtp.Create();
id1.Host:= hostftp;
id1.Port:= 21;
id1.Username:= usuario;
id1.Password:= senha;
try
ID1.Connect();
ID1.Get('atualizacao/Atualizacao.zip',ObterDiretorioDoExecutavel + 'Atualizacao.zip',True,True);
except
MessageBox(Application.Handle,'Não foi possivel conectar ou obter o arquivo','Erro',mb_ok+mb_iconerror);
end;
end;
Obs: não se esqueça de libera-los da memoria quando terminarem de baixar-o arquivo atribuído,pois se deixa-los, poderá causar um certo lag rsrs.
Adapte o código para seu uso.
