delphi 中怎么实现每隔一段时间比如（00：00：30）秒自动 按下Button

delphi 中如何实现每隔一段时间比如（00：00：30）秒自动 按下Button.
小弟是新手，所以请各位大虾们帮帮忙。

[解决办法]
Timer1.InterVal 设置为30000

procedure TForm1.Button1Click(Sender: TObject);
begin
ShowMessage( 'Click ');
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
Button1.Click;
end;