liser
09-03-2009, 10:25:00
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:
TMiServerSocket = class(TServerSocket)
public
constructor Create(AOwner: TComponent); override;
procedure SetMiHost (Value: string);
end;
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???
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:
TMiServerSocket = class(TServerSocket)
public
constructor Create(AOwner: TComponent); override;
procedure SetMiHost (Value: string);
end;
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???