Обмен сообщениями внутри сервиса

← →
AlexanderSK (2004-07-29 13:59) [0]

Разрабатываю сервис для Win2k. Форм он не имеет, но внутри него нужно реализовать обработку сообщений, посылаемых из других модулей этого же приложения. Подскажите, пожалуйста, как это лучше реализовать?

Заранее благодарен!

← →
Digitman © (2004-07-29 14:11) [1]

посылай сообщения трэду сервиса, например,вызовом PostThreadMessage() .. ID трэда сервиса хранится в св-ве TService.ServiceThread.ThreadId

в обработчике TService.OnExecute() в этом случае следует организовать цикл выборки/диспетчеризации этих сообщений по примерному шаблону

var
Msg: TMsg;
begin
while not Terminated do
begin
WaitMessage;
if PeekMessage(Msg, 0, SM_CONTROL, SM_CONTROL, PM_REMOVE) then
Dispatch(Msg.Message)
else
ServiceThread.ProcessRequests(False);
end;

RegisterWindowMessage

Обмен сообщениями внутри сервиса Найти похожие ветки