Форум: "Основная";
Текущий архив: 2004.09.12;
Скачать: [xml.tar.bz2];
ВнизКак изменить во время (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;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.041 c