如何在FORM1里的BUTTOM按下时，让FORM里引发一个事件？

Question

我在FORM1里有一个BUTTOM，当按下后要引发一个事件。现在在FORM2里写了：
if form1.button1.XXXX then //这里要怎么写才能判断FORM1里的BUTTON被点了？
  begin
  MessageDlg('!!!！',mtwarning,[mbOK],0);
  end;

Answer 1

通过给FORM2发消息是可以的，你在程序中自定义一个消息，在FORM2中处理。比如
procedure TForm1.Button1Click(Sender: TObject);
begin
  sendmessage(form2.handle,什么消息，参数，参数)；
end;然后在FORM2中处理这个消息就可以了

Answer 2

你想反了，
   你应该在form1.button的click事件中写要处理的代码;

Answer 3

zfpcb(我是你的传说) 可以考虑

Answer 4

你完全可以在Button1的click事件中来写呀，
if button1.click
then
form2.事件

Answer 5

你完全可以在Button1的click事件中来写呀，
if button1.click
then
form2.事件