вобщем ...
Код:

void __fastcall TMyService::ServiceExecute(TService *Sender) 
{ 
  _start_srv(); 

  MSG msg; 
  while (!Terminated) 
 { 
    if (WaitMessage()) 
    { 
        if (PeekMessage(&msg, NULL, 0, 0, PM_NOREMOVE) != 0) 
        { 
              this->LogMessage(msg.message, EVENTLOG_ERROR_TYPE, 0, 0); 
        } 
    ServiceThread->ProcessRequests(false); 
    } 
  } 

}

не ловит мессаги отправляемые в TTimer такими операторами
Код:

PostMessage(NULL,WM_CLIENT_LOG,0,0 ); 
PostThreadMessage(GetCurrentThreadId() ,WM_CLIENT_LOG,0,0);

хотя само WM_TIMER ежесекундно ловит

ПОЧЕМУ??

M>не ловит мессаги отправляемые в TTimer такими операторами

PostMessage(NULL, ...) является полным аналогом PostThreadMessage(GetCurrentThreadId(), ...), то есть — запускает мессадж в текущий тред.
Отсюда вопрос: вы делаете PostMessage в том же треде что и WaitMessage?

Ovl>Отсюда вопрос: вы делаете PostMessage в том же треде что и WaitMessage?


Да! компонент лежит на невизуальной форме сервиса....

Здравствуйте, malefik, Вы писали:

Ovl>>Отсюда вопрос: вы делаете PostMessage в том же треде что и WaitMessage?


M>Да! компонент лежит на невизуальной форме сервиса....


если вы сделаете вот так, то оно поймается?

void __fastcall TMyService::ServiceExecute(TService *Sender) 
{ 
  _start_srv(); 

  MSG msg; 
  while (!Terminated) 
 { 
    if (WaitMessage()) 
    { 
        if (PeekMessage(&msg, NULL, 0, 0, PM_NOREMOVE) != 0) 
        { 
              this->LogMessage(msg.message, EVENTLOG_ERROR_TYPE, 0, 0); 
        } 
        PostThreadMessage(GetCurrentThreadId() ,WM_CLIENT_LOG,0,0);
        ServiceThread->ProcessRequests(false); 
    } 
  } 

}

ДА ловит...в

void __fastcall TMyService::ServiceExecute(TService *Sender) 
{ 
_start_srv(); 

MSG msg; 
while (!Terminated) 
{ 
PostThreadMessage(GetCurrentThreadId() ,WM_CLIENT_LOG,0,0);

  if (WaitMessage()) 
 { 
     if (PeekMessage(&msg, NULL, 0, 0, PM_NOREMOVE) != 0) 
 { 
              this->>LogMessage(msg.message, EVENTLOG_ERROR_TYPE, 0, 0); 
} 
 ServiceThread->ProcessRequests(false); 
} 
} 

}

отседа вопрос как прально получить threadid?
еще работает в таймере с MyService->ServiceThread->ThreadID
с GetCurrentThreadId() никак

прошу прощения не вошел...

А>отседа вопрос как прально получить threadid?
А>еще работает в таймере с MyService->ServiceThread->ThreadID
А>с GetCurrentThreadId() никак

GetCurrentThreadId() — возвращает ThreadId для места вызова. Просто не факт что это тот, что вам нужен. Вам нужен ThreadId места, где вызывается WaitMessage.

посмотрите чему равно GetCurrentThreadId() в обоих местах. Если есть необходимость — запомните значение ThreadId для WaitMessage() и используйте его в PostMessage

вобщем работать стало ......если на "форму" (прошу прощения за выражение) сервиса бросить таймер.....и в обработчике его написать

void __fastcall TSRVDozor::Timer1Timer(TObject *Sender)
{
PostThreadMessage(SRVDozor->_id_thread,WM_CLIENT_LOG,3,5);
}

а в нитке самого сервиса....

void __fastcall TSRVDozor::ServiceExecute(TService *Sender)
{
  _start_srv();
  _id_thread = GetCurrentThreadId();
  MSG msg;
  while (!Terminated)
 {
   if (WaitMessage())
    {
        Sleep(5);
        if(PeekMessage(&msg, NULL , WM_CLIENT_LOG, WM_CLIENT_LOG, PM_NOREMOVE) != 0)
        {
                _log_data_module->_write_to_log(msg.message,"asd",1,1);
        }
    ServiceThread->ProcessRequests(false);
    }
  }
}

НО НЕ РАБОТАЕТ ЕСЛИ В ДОПОЛНИТЕЛЬНОМ DATAMODULE добавить Таймер

и слать оотуда

void __fastcall T_log_data_module::_log_timerTimer(TObject *Sender)
{
PostThreadMessage(SRVDozor->_id_thread,WM_CLIENT_LOG,3,5);
}

Почему???????????

актуально

M>НО НЕ РАБОТАЕТ ЕСЛИ В ДОПОЛНИТЕЛЬНОМ DATAMODULE добавить Таймер

M>и слать оотуда


M>

M>void __fastcall T_log_data_module::_log_timerTimer(TObject *Sender)
M>{
M>PostThreadMessage(SRVDozor->_id_thread,WM_CLIENT_LOG,3,5);
M>}
M>

M>Почему???????????

Простите, а кто должен дергать этот таймер? DataModule — это просто площадка для накидывания невизуальных компонент. Очереди сообщений (и активации таймера соответственно) она не имеет, если память не изменяет. Т.е. таймер просто не получит управления.

Здравствуйте, Аноним, Вы писали:


M>>НО НЕ РАБОТАЕТ ЕСЛИ В ДОПОЛНИТЕЛЬНОМ DATAMODULE добавить Таймер

M>>и слать оотуда


M>>

M>>void __fastcall T_log_data_module::_log_timerTimer(TObject *Sender)
M>>{
M>>PostThreadMessage(SRVDozor->_id_thread,WM_CLIENT_LOG,3,5);
M>>}
M>>

M>>Почему???????????

А>Простите, а кто должен дергать этот таймер? DataModule — это просто площадка для накидывания невизуальных компонент. Очереди сообщений (и активации таймера соответственно) она не имеет, если память не изменяет. Т.е. таймер просто не получит управления.

Думаю что имеет...вам стоит проверить это элементарным образом.....

void __fastcall T_log_datamodule::_log_timerTimer(TObject* Sender)
{
SRVDozor->LogMessage("ZZZ.", EVENTLOG_ERROR_TYPE, 0, 0);
}