帮我看看这是什么意思?(10分)

procedure TForm1.Button1Click(Sender: TObject);
var
obj:Tmyclass;
begin
obj:=Tmyclass.Create;
with memo1.Lines do
begin
add('对象的大小：'+inttostr(obj.InstanceSize));
add('对象所在的地址：'+inttostr(integer(obj)));
add('成员1所在的地址：'+inttostr(integer(@obj.FMember1)));
add('成员2所在的地址：'+inttostr(integer(@obj.FMember2)));
add('成员3所在的地址：'+inttostr(integer(@obj.FMember3)));
add('成员4所在的地址：'+inttostr(integer(@obj.FMember4)));

end;
obj.free;
end;
这里的integer()函数是不是取地址函数.还有inttostr(integer(@obj.FMember4)));
这里面的"@"是什么意思?

integer()是一种强制类型转换，即把@obj.FMember1的地址转换成integer型。
@表示取变量的地址。。。可参阅指针部分。

有个 Addr函数也是取地址?怎么用啊? 和上面的integer(obj)有什么区别啊?

兄弟，帮助这样写的:
Note: Addr is equivalent to the @ operator.
这个Addr函数和@效果是一样的.

谢了

问题解决了，就要给分，结贴.

哦！

多人接受答案了。