数据包结构定义问题，急急...

Question

数据包结构:
数据包分为包头和包体两部分，包头的结构如下:字段 长度（字节） 数据类型
PacketLength 4 Cardinal
RequestID  4 Cardinal
SequenceID 4 Cardinal包体结构:
字段           长度 数据类型
ClientID            8 String[8]
AuthenticatorClient 16 String[16]
LoginMode            1 byte
TimeStamp            4 cardinal
Version            1 byte
请各位大侠帮帮忙,在delphi里怎样定义:
  TData = Packed record
    .....
    .....
    .....
    .....
  end;
是分开成两个这样的格式吗？还是怎样？(本人是菜鸟)

Answer 1

type  TTHead=record
  PacketLength:Cardinal;
  RequestID:Cardinal;
  SequenceID:Cardinal;
end;
type  TData=record
  ClientID:String;
  AuthenticatorClient:String;
  LoginMode:byte;
  TimeStamp:cardinal;
  Version:byte;
end;
type TDataPackage=packed record
         Head:TTHead;
         Body:TData;
end;给分

Answer 2

TData = Packed Record
  ClientID: String[8];
  AuthenticatorClient: String[16];
  LoginMode: byte;
  TimeStamp: cardinal;
  Version: byte;
end;
第二个最好这样写