怎么得到变量的名称

如何得到变量的名称？
比如下面代码
procedure TForm1.Button1Click(Sender: TObject);
var
  tmpf:TForm;
begin
  tmpf:=TForm.Create(nil);
  tmpf.Name:='';
  tmpf.Caption:='';
  edit1.text:=tmpf //这里希望edit1里出现'tmpf'
end;

该如何实现？

[解决办法]
有汇编知识吗？
变量名只是对某个地址的别名，在编译成二进制代码后已经是没有任何变量的影子了
[解决办法]
别想了，拿不到的
老老实实用地址吧