怎样在edit中显示一个变量的内存地址，需要使用到什么样的API函数。谢谢！在线等候！

Question

怎样在edit中显示一个变量的内存地址，需要使用到什么样的API函数。谢谢！在线等候！

Answer 1

edit1.text:= inttostr(integer(@变量))

Answer 2

不行呀，好像提示溢出了。同时，我也试了一下edit1.text:=intToHex();编译告警都是一样的。具体的提示：There is a overloaded version of 'IntToStr' that can be called with these arguments.

Answer 3

我的代码如下：
procedure TForm1.Button1Click(Sender: TObject);
var
  p:^integer;
begin
  new(p);
  edit1.Text:=IntToStr(p);
  dispose(p);
end;

Answer 4

斑竹结贴。经过查询资料，问题已经解决。具体的解决方法是：
Edit1.text:=IntToStr(Integer(X));
其中假设X时变量。