怎么让程序运行5分钟后开始使一个计时器开始计时?

解决方案 »

  1.   

    不用定计时器,你怎么知道到了5分钟了?先设计时器的Interval为5*60*1000然后取第二次的Timer事件干其它的事情,或者直接就计时到5分钟不干活然后再做你要做的事情
      

  2.   

    放两个timer,其中一Timer1的属性:Interval:=300000//5分钟,Enabled:=True;
    另一个Timer2的属性:Interval:=XXX//5分钟以后计时器的间隔时间,Enabled:=False;
    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    例如:
    procedure TForm1.Timer2Timer(Sender: TObject);
    begin
    form1.Label1.Caption:=datetimetostr(now);
    end;procedure TForm1.Timer1Timer(Sender: TObject);
    begin
    form1.Timer1.Enabled:=false;
    form1.Timer2.Enabled:=true;
    end;