AData.Size);
UDPMemo.Lines.Add(''Received "'' + DataStringStream.DataString + ''" from '' + ABinding.PeerIP + '' on port '' + IntToStr(ABinding.PeerPort));
s := ''Replied from '' + UDPServer.LocalName + '' to "'' + DataStringStream.DataString + ''"'';
ABinding.SendTo(ABinding.PeerIP, ABinding.PeerPort, s, Length(s));
finally
DataStringStream.Free;
end;
end;
end.