Seleccionar direccion IP de mi ServerSocket
 

Buenos días y gracias por adelantado, les cuento mi caso.

Tengo un PC con varias direcciones IP dadas de alta en el mismo.

Estoy modificando una aplicación con delphi 7 y estoy usando TServerSocket, y lo que necesito es decirle cual es la Ip de las distintas que tengo por las que va ha hablar con otras maquinas de la misma manera que le estoy indicando el puerto. Desgraciadamente no existe una propiedad Address o Host que me permita indicarle la dirección.

La primera idea que tuve fue crearme un objeto:

Código Delphi [-]
  TMiServerSocket = class(TServerSocket)
  public
     constructor Create(AOwner: TComponent); override;
     procedure SetMiHost (Value: string);
  end;

Código Delphi [-]
constructor TMiServerSocket.Create(AOwner: TComponent);
begin
  inherited Create(AOwner);
end;

procedure TMiServerSocket.SetMiHost (Value: string);
Begin
  SetHost (Value);
end;

Que recoge el procedimineto SetMiHost del componente padre TAbstractSocket.

Pero me esta dando un error (Solo se permite un uso de cada dirección de Socket)

Alguna idea???

Creo que se puede especificar la direccion en UdpSocket (D7+)