如何定义这样的记录?

Question

通常用于解码或者协议数据, 此类数据通常含有 不是8位的数字类型(不等于 一个 byte). 
0 1 2 3   4 5 6 7      0 1 2 3  4 5 6 7
- - - -   - - - -      - - - -  - - - -
_____ _____ ______________ ____________
 type  kind       id          othertype:  3 bits
kind:  2 bits
id:    5 bits
other: 6 bits这样的记录如何定义使得处理此类数据方便?

Answer 1

Delphi里面有一个TBits类，也许能够满足你的需要:)

Answer 2

8位是Byte0: $01
1: $02
2: $04
3: $08
4: $10;
5: $20
6: $40;
7: $80;
8: $100;//9: $200;
//10: $400;
依此类推
传过来的数用Byte来表示，查看第1位是否为1，用：
  if (Value and $01) = $01 then
  begin 
    第一位为1
  end;
  ...如果是C/C++，它支持这种情形：
union
{
  BYTE type: 3;
  BYTE kind: 2;
  BYTE id: 5;
  BYTE other: 6;   
} TData, *LPData;不过pascal不行