Uso del compoente TIDUDPServer

[cmfab]

Gracias ecfisa, por ahí parece que anda la cosa, pero me marca como error el tipo TIdBytes, por lo que pensé que lo podria sustituir por TBytes así que hice esto:

Código Delphi [-]
procedure TForm1.udpServerDeviceUDPRead(AThread: TIdUDPListenerThread;
AData: TBytes; ABinding: TIdSocketHandle);
begin
   Mensaje.Lines.Add( 'De: ' + ABinding.PeerIP );
   Mensaje.Lines.Add( 'Mensaje: ' + PChar( AData ) );
end;

compila bien, pero el menaje en el cliente no lo muestra correctamemente, me salen carcateres no validos alasí como

De: 127.0.0.1
Mensaje: 慫楫ೠƯ
alguna idea ?

Gracias nuevamente por tu tiempo