Планировщик

← →
Lizard © (2003-02-13 11:22) [0]

Всем привет!
Написал службу - планировщик задач. Основная проца:
procedure TService1.Service1Execute(Sender: TService);
begin
TimerID1 := SetTimer(0,0,interval1,@TimerEvent1);
TimerID2 := SetTimer(0,0,interval2,@TimerEvent2);
while not Terminated do
ServiceThread.ProcessRequests(False);
KillTimer(0,TimerID1);
KillTimer(0,TimerID2);
end;
Систему пригружает конкретно! Что не так?

← →
han_malign © (2003-02-13 11:30) [1]

а на кой тебе таймер, да еще два?

← →
Lizard © (2003-02-13 11:55) [2]

таймер - для запуска прог в разное время - можно,конечно, и с одним тайметором - но думаю проблема не в этом.

← →
Lizard © (2003-02-13 11:55) [3]

таймер - для запуска прог в разное время - можно,конечно, и с одним таймером - но думаю проблема не в этом.

while not Terminated do begin
ServiceThread.ProcessRequests(False);
Sleep(5);
end;
а вообще где ты эти таймеры ловишь, они ведь валятсся в основной поток, а не в нить?
З.Ы. Если таймер - то зачем нить, если нить - то зачем таймер???

Почему в основной поток, видишь там параметр ,@TimerEvent1

Планировщик Найти похожие ветки