ОА "Микротехника"

UDP server read

procedure TForm1.IdUDPServer1UDPRead(AThread: TIdUDPListenerThread;
const AData: TIdBytes; ABinding: TIdSocketHandle);
var str:string;

begin
str:=BytesToString(Adata,en8bit);
end;
Delphi