Вниз
Скачать: CL | DM;

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

 
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]

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


 
han_malign ©   (2003-02-13 12:26) [4]

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


 
Anatoly Podgoretsky ©   (2003-02-13 12:41) [5]

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



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.013 c
1-76013
bsa
2003-02-13 09:25
2003.02.24
Delphi7 - компонент TPopupActionBar


1-75995
Chlavik
2003-02-11 01:04
2003.02.24
ListBox


3-75807
JB
2003-02-06 13:35
2003.02.24
Базы и локальная сеть


14-76130
Supreme
2003-02-06 20:33
2003.02.24
Объясните плиз толкование слов


6-76080
Ihor Osov'yak
2003-01-04 22:51
2003.02.24
TWebBrowser: установка прокси и возврат к установкам IE




   Наверх