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

service   Найти похожие ветки 

← →
race1 ©   (2004-02-21 17:04) [0]

вопрос с сервисом. в нём нужно следить за кое-чем, слежение происходит в таймере. но ведь сервис что-то типа потока, где есть execute и пока execute выполняется, сервис работает. вот и встал вопрос - куда помещать мой таймер и как обрабатывать его ontimer.

в случае со стандартным приложением помещаем таймер на форму и не думаем об нём

---

← →
TUser ©   (2004-02-21 17:05) [1]

чесно слово - с сервисами не работал, но если он типа потока,
то м.б. while true do begin ... end;

---

← →
race1 ©   (2004-02-21 17:07) [2]

ну понятно что он типа потока и что while true do :)

как-то неохота делать таймер через бесконечный цикл :))

---

← →
TUser ©   (2004-02-21 17:09) [3]

тогда таймер не нужен. В потоках я делаю так
while true do begin
inc (i);
if i = mnogo then begin
i:=0;
// Работаем
end;
end;

---

← →
race1 ©   (2004-02-21 17:16) [4]

хитро :)

---

← →
race1 ©   (2004-02-21 17:16) [5]

хитро :) только пожалуй sleep нужно добавить, а то грузить проц будет слишком

---

← →
P.N.P. ©   (2004-02-21 17:54) [6]


procedure TService1.ServiceExecute(Sender: TService);
begin
while not terminated do
begin
..........
sleep(100);
ServiceThread.ProcessRequests(False);
end;
end;


---

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

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



Память: 0.46 MB
Время: 0.013 c