一个关于SizeOf的问题(100分)

xiaoywh · 2006-06-03

type  TRec = Record    c : char;    b : integer;    a : Word;  end; var  r: TRec; begin  ShowMessage(IntToStr(SizeOf(r))+'<>'+              IntToStr(SizeOf(r.b))+'  '+              IntToStr(SizeOf(r.a))+'  '+              IntToStr(SizeOf(r.c))); end; 大家可以看看结果为什么数据的长度不等于成员总加值的长度,另外还有一个现象:将数据r内成员a,b,c的定义顺序调换一下,结果又会发生很大的变化,原因何在?

xiaoywh · 2006-06-03

已解决!谁要分就顶一下就.

cdj000 · 2006-06-03

LSUPER · 2006-06-03

delphi record 内数据自动对齐啊

我爱delphi · 2006-06-03

那就顶呗~

liqj_ · 2006-06-03

来自：LSUPER, 时间：2006-6-3 1:22:37, ID：3460799 delphi record 内数据自动对齐啊   正解

wp231957 · 2006-06-03

路过

来如风 · 2006-06-03

TRec = packed Record 这样就等于了吧

dongy_143 · 2006-06-03

楼主能否说下答案呢？想知道，呵呵

NeutronDelphi · 2006-06-03

TRec = Record    c : char;    b : integer;    a : Word;  end; Sizeof(TRec)应该是12 为了提高访问b这个整型,必须 4字节对其. A也是,所以 4*3=12

yepemig · 2006-06-03

顶,还是不明

dez_0609 · 2006-06-03

32位的计算机默认是按照4字节对齐，不足的补充到4的倍数长度,eg: TRec = Record    c : char;    a : Word;    b : integer;  end; Sizeof(TRec)应该是 4+4=8 TRec = Record    c : char;    a : Word;    b : integer;    d : DWord ;    e :  char ;  end; Sizeof(TRec)应该是 4+4+4+4=16

xiaoywh · 2006-06-03

多人接受答案了。

一个关于SizeOf的问题(100分)

xiaoywh

Unregistered / Unconfirmed

xiaoywh

Unregistered / Unconfirmed

cdj000

Unregistered / Unconfirmed

LSUPER

Unregistered / Unconfirmed

我爱delphi

Unregistered / Unconfirmed

liqj_

Unregistered / Unconfirmed

wp231957

Unregistered / Unconfirmed

来如风

Unregistered / Unconfirmed

dongy_143

Unregistered / Unconfirmed

NeutronDelphi

Unregistered / Unconfirmed

yepemig

Unregistered / Unconfirmed

dez_0609

Unregistered / Unconfirmed

xiaoywh

Unregistered / Unconfirmed

Similar threads