[orodriguezc]

Prueba de la siguiente forma:

Código Delphi [-]
  Servidor1.Bindings.Clear; 
  Servidor1.Bindings.Add;
  Servidor1.Bindings.Items[0].IP := edit2.Text;
  Servidor1.Bindings.Items[0].Port := StrToInt(edit1.text);
  Servidor1.Active := True;