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;