怎麼樣才能在程序中定時啟動某一事件?(100分)

  • 主题发起人 主题发起人 绝对零度
  • 开始时间 开始时间

绝对零度

Unregistered / Unconfirmed
GUEST, unregistred user!
我需要在程序中每隔一天觸發一個事件?我該怎麼做?假設我的程序一直運行的。
我不想用Timer控件,這樣太浪費資源了。
請各位大蝦幫幫忙!!
 
好像没有别的方法吧。
 
建议使用Timer, 现在的计算机配置都较好,对性能没有太大的影响。

98使用任务。
nt/2000用服务
 
可以查一查计划任务管理器的资料。那是系统自带的。
 
每天触发?
用timer是最简单的~ 想不到其他的
 
那只有用系统的时间作为触发条件了,date试试
或者看看日历控件
 
在线程中用Sleep不占用CPU。
 
不用timer也行,就是自己另处写一个timer.不过还是费资源!
[:D]
 
CreateWaitableTimer + WaitForSigleObject也可以。
 
用TTimer最方便了,再说你对计时要求也不严格,就用它就行了。
 
http://www.delphibbs.com/delphibbs/dispq.asp?lid=862558
 
还是用Timer控件吧,把时间间隔设大,就不会浪费多少资源了。如可以间隔设为一分钟,
你要在12:00:00时触发程序的话,就在timer事件中检测当前时间是否处于
11:59:31到12:30:00之间(间隔也是一分钟),如是触发程序。
 
這麼多人,難道一定要我用Timer控件嗎
 
這麼多人,難道一定要我用Timer控件嗎
 
不用timer控件,可以在下列事件中觸發:
procedure Idle(Sender: TObject; var Done: Boolean);
procedure TForm1.FormCreate(Sender: TObject);
begin
application.OnIdle:=Idle;
end;

procedure tform1.Idle(Sender: TObject; var Done: Boolean);
begin
寫事件。
end;
//注:上述事件也是時刻觸發的。
 
后退
顶部