读书人

delphi 中怎么实现每隔一段时间比如(

发布时间: 2012-02-20 21:18:24 作者: rapoo

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;

读书人网 >.NET

热点推荐