新手问超级菜的问题

[scsker]

请问,在delphi中如何取一个变量的地址呢?
如procedure TForm1.testClick(Sender: TObject);
var int1:integer;
begin
int1:=testocx.Init('C:\test',1);
int1的值返回的竟然是一长串的数字,我想取int1的地址,如何做呢?谢谢.或者怎样防止它出现一长串的数字呢?谢谢.

[scsker]

不好意思，我是菜鸟，没有看明白你的代码。比如说我找int1变量的地址，如何取的呢？是把aVar换为int1？好像不行吧。我取了地址，在程序中又如何引用地址呢？请说一下，谢谢。这个周末去买书系统的学习一下。

[postren]

取地址操作用 @

[老之]

function GetAddr(const aVar): string;
begin
Result:= IntToHex(integer(@aVar), 8);
end;