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]

хитро :)

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

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

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