两个button指向同一onclick事件问题

Question

我想让两个button指向同一onclick事件，可是在程序中我想判断一下到底是哪个按下了哪个button，怎么解决？
谢谢！

Answer 1

If TButton(Sender).Name = Button1.Name then
    ...

Answer 2

用If Sender = Button1 then就可以了，用Name更危险，对于程序中动态创建的一般都没有Name

Answer 3

应该也可以用tag。先将button的tag设置一下（如1、2、3、……）。
然后在程序中
case (sender as tbutton).tag of
    1:……;//加入你要写的代码，处理tag＝1的button控件
    2:……;//加入你要写的代码，处理tag＝2的button控件
    ……
end;

Answer 4

来晚了，上面的大哥iamastudent(书生)搞定了！~_~