＋设为首页 ＋添加到收藏夹
在delphi里面的定时器组件可以设置它的Interval属性来确定时间间隔
当时间间隔一到就执行放在定时器里面的代码。
我想问的是除了用定时器还有什么其他的办法了吗？而且它的时间间隔
最多只能设到30几秒。例如：我要每隔1小时执行一段特定的代码，应该怎么
办呢？
用一个TTimer，Interval的值为1000
var
LastTime:int64; //定义一个全局变量
procedure TForm1.FormCreate(Sender: TObject);
begin
LastTime:=GetTickCount div 1000;
end;
procedure TForm1.Timer1Timer(Sender: TObject);
begin
if ((GetTickCount div 1000)-LastTime)>3600 then
begin
LastTime:=GetTickCount div 1000;
//执行你要的代码...这样就一个小时执行一次
end;
end;
