如何判断是来自哪个函数的啊？

Question

例如，有两个窗口form1,有两个按扭，btn1，btn2，btn1.onclick;和btn2.onclick 均有以下语句
begin
  form2.showmodal;
edn;
 form2.onshow（）
begin
   if (来自btn1) then ；
   if  (来自btn2)    then .....;
end;上面两个判断怎么写？

Answer 1

if sender=btn1 then
....
if sender=btn2 then
....

Answer 2

if TButton(sender).name=btn1.name then
  begin
    ...
  end
else if TButton(sender).name=btn2.name then
  begin
    ...
  end;

Answer 3

唉，再次强调，看delphi开发人员指南

Answer 4

我曾经用我说的方法为动态生成的菜单产生动态的事件，已经多次验证过，这样是可行的，你不妨再研究研究，看看究竟是什么地方出了问题，也可以Email Me:[email protected]，咱们一起讨论讨论：）

Answer 5

这样写对吗？ 
    if TBitbtn(sender)=f_in_service.BitBtn1 then
    begin
    edit1.Text:='';
    edit2.Text:='';
    edit3.Text:='';
    edit4.Text:='';
    end;  执行没有错误，可是不能完成功能