如何显示谁调用了自己? procedure TForm1.Button2Click(Sender: TObject);beginform1.Button1.Click;end;谁调用了button1? 请写明语句,谢谢 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TForm1.Button2Click(Sender: TObject);begin Button1Click(Sender);end;procedure TForm1.Button1Click(Sender: TObject);begin if Sender is TComponent then ShowMessage(TComponent(Sender).Name);end;根据Sender的Name来判断 关于执行查询时调用线程窗体的问题 Delphi编程Study 压抑,这些简单的东西我都看不懂....只好请教你们了.在线等.... 能判断某个菜单下有没有子菜单吗? Delphi开发Web的问题 在网上实时传播声音数据用什么协议比较好? 关于进度条的使用,请各位高手指教 急请教!报表打印时如何使用变量控制函数COPY(STR,S,L)中的S? 轻风请进 一个三层的简单问题,数据库端文本如何在客户端显示? 在DLL中使用TADOQuery的问题 代码生成控件 如和写事件?
begin
Button1Click(Sender);
end;procedure TForm1.Button1Click(Sender: TObject);
begin
if Sender is TComponent then
ShowMessage(TComponent(Sender).Name);
end;根据Sender的Name来判断