自动生成的按钮,如何指定按钮的click ( 积分: 50 )

5个自动生成的按钮,name分别是button10-button15.
我想在用鼠标点击一个按钮如:button10后,用label1.capton:=button10,
然后在timer中隔10秒钟自动点击一次这个按钮,也就是实现刷新.
谢谢大家

(1)button10-button15好像是6个按钮。。。。[]
(2)实现方法：
1.timer1的属性Interval:=10000;
2.······
private
{ Private declarations }
i:integer;
······
procedure TForm1.Button10Click(Sender: TObject);
begin
label1.capton:=button10.caption;
i:=10;
end;
procedure TForm1.Button11Click(Sender: TObject);
begin
label1.Caption:=button11.Caption;
i:=11;
end;
······
procedure TForm1.Timer1Timer(Sender: TObject);
begin
case i of
10:button10.Click;
11:button11.Click;
12:button12.Click;
13:button13.Click;
14:button14.Click;
end;
end;
······

窗口定义一个过程，如：
TForm1.myclick(sender:TObject);
btn.onclicked：＝myclick

……
然后再用timer

lovedesky 的答案应该可行,今晚回去实验.
感谢yeskert1的热情参与.