Question

delphi timer 什么时候开始运行，程序一开始就开始执行吗

Answer 1

Enabled为true时运行。不过如果是动态设置Enabled的话，那么timer里的事件会在第一个触发周昌悄期以后郑羡执行，也就是说，如果触发周期是1秒，那程序代码里动态设置Enabled := True，这时还不会执行timer事件，而是会等到1秒后耐丛渣执行。
顺便鄙视下乱贴代码的

Answer 2

Timer定时运行

-
定时运行这个问题其实老早就接触到了，不过在上次的程序中似乎没有很好的解决这个问题，并桥扰且没有深入下去。这次再次碰到同样的问题，在查找了网锋旁上的资料以后，对这一问题有了比较深的理解银消橡。在程序中实现定时运行的思路：
由timer控件实现
两个timer控件，其中timer1负责每一分钟检查一次系统时间和设定时间的差值，如果两者相差5分钟，则继续检查，直到当相差时间小于5分钟，触发timer2，timer2的定时器时间就是这个时间间隔。当timer2到时以后，就触发主程序。具体代码

procedure TForm1.Button1Click(Sender: TObject);
begin
timer1.Interval:=60*1000; //启动监控，每1分钟检查一次设定时间和当前时间
timer1.Enabled:=true;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
var
l_time: TDateTime;
h_time: TDateTime;
ss:Int64;
begin
timer1.enabled:=false;
h_time:= strtotime('10:30:00');
l_Time := time; //now是取当前的日期加时间，time只取当前时间
if (h_time>l_time) then begin
ss:=SecondsBetween(h_time,l_time); //求两个时间相差多少秒
if ss<5*60 then begin //如果时间间隔小于5分钟定时启动timer2
timer1.Enabled:=false;
showmessage('Inteval seconds:'+inttostr(ss));
timer2.Interval:=ss*1000;
timer2.Enabled:=true;
end;
end
else
timer1.enabled:=true;
end;

procedure TForm1.Timer2Timer(Sender: TObject);
begin
timer2.enable:=false;
showmessage('ok on time run the program');
// start...
timer1.Enabled:=true; //再次开始监控
end;

Answer 3

timer 是程序以启动就开始运行的。并且是循环一直运行下去

Answer 4

timer1.Enabled:=true; 的时候开始执行

Answer 5

Enabled=true 时才会执行；