delphi 7 关于onclick事件

我的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事件^_^，这样怎么写代码呢？

关于Delphi 7的问题 关于DELPHI？ 关于delphi 关于delphi 7弹出对话框的问题 关于DELPHI动态数据库 关于Delphi的 关于delphi编程 关于delphi中的ProgressBar 关于DELPHI的问题！！~~ 关于Delphi的几个问题???