socket记录型、数组（数据包）接收问题！

Question

有如下定义的记录类型数据包：
pack = record                  //包头信息
   cBz :array[0..10] of char;
   ......
end;charge = record                //明细
   cph :array[0..10] of char;
   iKn :integer;
end;strucp = record                //返回
   iTe :integer;
   Det :array[0..10] of charge;
end;PackHead = record             //总包体
   had : pack; 
   ucp : strucp;
end;
服务端发送过来后，我应该怎么接收，（注：服务端无须我管。）
在ClientSocket1的Read事件怎么写?请各位高手伸出援助之手！！！