delphi 7 关于onclick事件

Question

我的delphi7 的程序中，有3个procedure TForm1.Button1Click(Sender: TObject);事件（on1Click on2Click on3Click）
那么我的on1Click有一个事件，on2Click有另一个事件，
现在我要让我的on2Click事件
为edit7.Text:='' ;
edit9.Text:='' ;
edit26.Text:='' ;
edit28.Text:='' ;
再加on1Click的事件然后再on2Click的事件
要怎么写代码
举个例子
就是我有Button1，Button2，Button3，edit1，edit2，edit3，
然后
procedure TForm1.Button1Click(Sender: TObject);
begin
edit1.text：＝'111'；
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
edit2.text:='222';
end;
procedure TForm1.Button3Click(Sender: TObject);
edit3.text:='333';
然后执行Button2Click ；
再然后执行Button1Click ；
end；
即再Button3Click的代码中的随意一行利用代码调用别的按钮的onclick事件^_^，这样怎么写代码呢？

Answer 1

你想在 button1的onclick事件里调用button2的onclick事件可以这样写
procedure TForm1.Button1Click(Sender: TObject);
begin
button2.Click; //这句是关键
end;

参考资料：如果我的回答让你满意，请加分！谢谢

Answer 2

大哥你是不是要写个递归函数呀？ 没太看明白你什么意思，如果是写递归函数出口是什么？

Answer 3

真的没看懂你想干什么

Answer 4

楼主说的不明白 建议再说具体下
你想实现的真的是递归？