高手看来简单的问题，却让想放弃学delphi了！救救我呀！

Question

先谢各位了！我的问题是：
我有一个procedure Tjbzlform.Button5Click(Sender: TObject);它执行了一个功能，
可是我在procedure Tjbzlform.Button678766Click(Sender: TObject);中想重新执行一次procedure Tjbzlform.Button5Click(Sender: TObject);
要怎么写呀？

Answer 1

可以直接在procedure Tjbzlform.Button678766Click(Sender: TObject);中直接选择啊
选中Button678766 在evens 中找到 onclick 在下拉列表中选择就可以了

Answer 2

这点困难就放弃了？
如果有别的代码就
procedure TForm1.Button5Click(Sender: TObject);
begin
    showmessage('5');
end;procedure TForm1.Button6Click(Sender: TObject);
begin
    showmessage('6');
    Button5Click(sender);
end;如果和button5完全一样就直接在object inspector的envents页面里找到onclick事件，在下拉框里选button5click