Текущий архив: 2004.09.12;
Скачать: CL | DM;
Вниз
Как изменить во время (Pause, Resume) TimeOut сервиса? Найти похожие ветки
← →
Erik1 (2004-08-30 17:09) [0]У меня в TService стоит 1 секунда, но Pause, Resume выполняются намного быстрее. Я хочу сразу после выполнения, проинформировать видовый сервис менаджер, что операция завершина.
Примерно так:
procedure TSrvDJP.ServicePause(Sender: TService; var Paused: Boolean);
begin
RealEvent.Suspend;
Paused := True;
ReportStatus; //--Это непомогло.
end;
← →
Erik1 (2004-08-31 10:54) [1]Что неужели никто неразбирался как работает TServiceApplication. Проблема в том, что при изменении TimeOut, реальное оповещение об этом отрабатывает только после окончания событий OnPause и пр..
Страницы: 1 вся ветка
Текущий архив: 2004.09.12;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.037 c
