我在button2中如何调用button1的click事件?

解决方案 »

  1.   

    最简单的办法是把,button2的onclick的事件关联到button1上就可以了
     不过最好还是在
    button1.click中调用
    button1.onclick
      

  2.   

    button2.click中调用
    button1.onclick
      

  3.   

    begin
      Button1.Click;
    end;
      

  4.   

    应该这样写
    procedure TForm1.Button1Click(Sender: TObject);
    begin
    showmessage('sfas');
    end;procedure TForm1.Button2Click(Sender: TObject);
    begin
    button1click(self);//这样写,就是上面的过程名.
    end;end.