如何调用函数 No.1Button1.Click;No.2Button2.OnClick := Button1.OnClick;No.3Button1Click(Button1); 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 No.4 建议使用TActionList 附加procedure TForm1.Button1Click(Sender: TObject);begin ShowMessage(TButton(Sender).Caption); //可以通过Sender知道是啥按钮end; 先完成按钮a的点击事件代码,然后转到Object Inspector的事件页,从按钮b的点击事件下拉框中选择刚才按钮a的点击事件 定义一个简单对象不能通过编译 如何把它编成控件?? cuteant接分,谢谢帮我解决问题,剩下的分数给你-2. 俄罗斯方块 求购无时间限制的录音原代码 求助:请专家看看这例风湿病!本市医院检测不出结果! 重返CSDN散分! 散分。顺便问一下,现在是上班时间,为何大家都在这里,请大家随便说说。 delphi有右函数,左函数,像VB的Left,Mid,Right 怎样不关闭文件而向文件中真正写入数据? 过年了,送分! 程序不能保留原貌!及其不便…………
TActionList
procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage(TButton(Sender).Caption); //可以通过Sender知道是啥按钮
end;
从按钮b的点击事件下拉框中选择刚才按钮a的点击事件