关于结构体的大小

第一步是要知道结构体大小的计算方式：

    结构体大小等于最后一个成员的偏移量加上最后一个成员的大小，

    偏移量指的是结构体变量中成员的地址 – 结构体变量地址的差， 第一个成员的偏移量为0

下面代码

TRecord2 = record
    a: Integer;
    b: Integer;
    c: Integer;
  end;

 {$A8+}
 TRecord1 = record
    a1: Byte;
    a2: Integer;
    a3: Int64;
    a4: Byte;
    a5: Word;
    case Integer of
      0: (e1: TRecord2);
      1: (e2: Int64);
  end;

直接用数据说话吧:

下面是每个成品的偏移量

a1:0, a2:4, a3:8, a4:16, a5:18, e1:24, e2:24, size:40

其实可以画一个格子<下面每个格子代表对齐的字节数>

a1, a2

a3

a4,a5

e1

e1

还有一种

TRecSingle = record
  a1: Byte;
end;

这种大小是1