delphi获取申明变量的指针地址,该怎么解决

delphi获取申明变量的指针地址
比如我声明几个变量

var
a:integer;
b:string;
c:pointer;
begin
end;

我想获取这3个变量的指针地址,不是里面的内容,是他分配的地址。


比如我有一个函数
function aaa(a,b:integer):integer;
begin
result:=a+b;
end;


我想获取这个函数分配的内存地址,如何获取,

只是好奇,不做坏事。谢谢各位姐姐叔叔
------解决方案--------------------
procedure TForm1.Button1Click(Sender: TObject);
var a:integer;
    p:Pinteger;
begin
   a := 100;
   p := @a;
end;

------解决方案--------------------
point(a)^
point(b)^
point(c)^

@aaa就是函数地址
------解决方案--------------------
全局变量所占用的内存地址是固定不变的
局部变量调用时在栈上分配,地址不是固定的

在变量在前面加上@即就是取址了
------解决方案--------------------
IntToHex(12345, 8)
引用:
我怎么把这个地址,显示出来,这个不会,呵呵