16,748
社区成员
发帖
与我相关
我的任务
分享如何得到变量的名称？
比如下面代码
procedure TForm1.Button1Click(Sender: TObject);
var
tmpf:TForm;
begin
tmpf:=TForm.Create(nil);
tmpf.Name:='';
tmpf.Caption:='';
edit1.text:=tmpf //这里希望edit1里出现'tmpf'
end;
该如何实现？
procedure TForm1.Button1Click(Sender: TObject);
var
tmpf:TForm;
begin
tmpf:=TForm.Create(nil);
tmpf.Name:='';
tmpf.Caption:='';
edit1.text:=tmpf //这里希望edit1里出现'tmpf'
end;
该如何实现？
...全文
请发表友善的回复…
发表回复
sdzeng 2007-12-19
- 打赏
- 举报
别想了，拿不到的
老老实实用地址吧
老老实实用地址吧
edongxu 2007-12-19
- 打赏
- 举报
有汇编知识吗？
变量名只是对某个地址的别名，在编译成二进制代码后已经是没有任何变量的影子了
变量名只是对某个地址的别名，在编译成二进制代码后已经是没有任何变量的影子了
starluck 2007-12-19
- 打赏
- 举报
edit1.text := tmpf.name;
jfslan 2007-12-19
- 打赏
- 举报
不是吧，大哥。
我的意思是在别的地方能得到这个变量名称。
比如在不同的环境下有很多不同的程序用不同的变量创造form。现在我知道了某个form的handle，怎样才能知道该form是用那个变量创造的。
我的意思是在别的地方能得到这个变量名称。
比如在不同的环境下有很多不同的程序用不同的变量创造form。现在我知道了某个form的handle，怎样才能知道该form是用那个变量创造的。
confucius 2007-12-19
- 打赏
- 举报
edit1.Text := 'tmpf';
