Ver Mensaje Individual
  #6  
Antiguo 26-05-2006
Avatar de seoane
[seoane] seoane is offline
Miembro Premium
 
Registrado: feb 2004
Ubicación: A Coruña, España
Posts: 3.717
Reputación: 24
seoane Va por buen camino
Supongo que estas usando los componentes Indy (si no es asi corrigeme), yo no controlo mucho el funcionamiento de estos componentes pero no parece muy complicado. En el IdUDPServer en la propiedad DefaultPort colocas el puerto que quieres usar, Active = TRUE y BroadcastEnable = TRUE. Y en el IdUDPClient colocas tambien el valor del puerto y BroadcastEnable = TRUE.

Para mandar un mensage:
Código Delphi [-]
  idUDPClient1.Send('Hola mundo');


Y para recibirlo en el evento OnUDPRead del UDPServer
Código Delphi [-]
procedure TForm1.IdUDPServer1UDPRead(Sender: TObject; AData: TBytes;
  ABinding: TIdSocketHandle);
begin
  // Mostramos el mensage
  ShowMessage(String(PChar(AData)));
end;

De todas formas haber si te responde alguien con mas experiencia con estos componentes, yo cuando he trabajado con UDP ha sido utilizando directamente funciones de la API y no tengo mucha experiencia con Indy.
Responder Con Cita