D
doubeye
Unregistered / Unconfirmed
GUEST, unregistred user!
最近看delphi的语言手册，看到内存管理中有一段介绍类类型的虚拟方法表，其中位移值为-28为对象大小的字节表示（字节为单位），我如何能得到这个值呢
我写的代码如下：
TMarkwork = Class(TObject)
//具体声明略掉了
End;
Var
p : ^Cardinal;
size : Integer;
markwork : TMarkWork;
Begin
markwork := TMarkwork.create();
//一些操作被省略
p := @markwork;
dec(p,7);
size := p^;
showmessage(inttostr(size));
End;
每次的到的大小都不一样，是不是我那里写错了啊，哪个大哥能帮忙指教一下，谢谢了
我写的代码如下：
TMarkwork = Class(TObject)
//具体声明略掉了
End;
Var
p : ^Cardinal;
size : Integer;
markwork : TMarkWork;
Begin
markwork := TMarkwork.create();
//一些操作被省略
p := @markwork;
dec(p,7);
size := p^;
showmessage(inttostr(size));
End;
每次的到的大小都不一样，是不是我那里写错了啊，哪个大哥能帮忙指教一下，谢谢了