有关记录的长度问题

Question

定义了一个记录如下:
type
  Bill = Record
    BillID : integer;
    BillSerial:byte;
  end;
按道理,这个记录的长度应为5Byte,但实际上我在运行时用SizeOf取得的此记录的长度为8Byte.在C语言中可以用编译指令#pragma pack(1)来解决这个问题.但在Delphi中应该如何解决?
谢谢!

Answer 1

procedure TForm1.Button3Click(Sender: TObject);
type
  Bill = packed record
    BillID : integer;
    BillSerial:byte;
  end;
begin
  ShowMessage(IntToStr(Sizeof(Bill)));
end;