一个 IdUDPClient 和 IdUDPServer 的问题请教。(50分)

两个程序。
Client：
var
tmpbyte:array of byte;
begin
tmpbyte[0]:=$02;
tmpbyte[1]:=$0C;
tmpbyte[2]:=$E1;
tmpbyte[3]:=$FE;
tmpbyte[4]:=$66;
tmpbyte[5]:=$B2;
tmpbyte[6]:=$00;
IdUDPClient1.SendBuffer(tmpbyte,7);
end;

Server 部分如何去利用 IdUDPServer 来接收和解释这一个Buffer 呢？
麻烦各位了。

？？ 就是那么读啊.....
在server的OnUDPRead(Sender: TObject;
AData: TBytes;
ABinding: TIdSocketHandle);
读那个AData不就行了....
你还是按 AData[0]、AData[1]、AData[2] .......

在server的OnUDPRead(Sender: TObject;
AData: TBytes;
ABinding: TIdSocketHandle);
中：
var
buf: array[1..6] of byte;
begin
Adata.ReadBuffer(buf, Adata.size);
...
end;