Como asignar dirección IP al IdTCPServer, con código
 

Holaa amigos, alguien sabe como se puede asignar una dirección IP al IdTPCSever con código, he probado con lo siguiente pero no funciona:

Servidor1.Bindings.Clear;
Servidor1.Bindings.Add;
Servidor1.Bindings.Items[0].IP := edit2.Text;
Servidor1.Bindings.DefaultPort := StrToInt(edit1.text);
Servidor1.Bindings.Items[0].Bind;
Servidor1.Active := True;

Algo está mal?, o se tiene que hacer de otra forma, agradecería mucho si me dijeran como se hace.
Graciasss.

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;