procedure TForm1.BPartenzaClick(Sender: TObject);
begin
IdTCPClient1.Connect();//Apre la connessione

IdTCPClient1.Port:= StrToInt(Porta.Text);//La porta

IdTCPClient1.Host:= Host.Text; //Indirizzo dell'Host
end;

E corretto ora per ricevere dal server in una memo ????????
Come faccio????????'''''