Синхронизация в сервисе Windows

[1g0r]

WinXP, FPC 2.2.4 , Lazarus 0.9.28.2

Для создания сервиса использую пакет lazdaemon.
Не выполняется Synchronize для методов вторичного потока. Во вложении тестовый пример.
На bugtracker такой проблемы не нашел, на форуме тоже. Может конечно я что-то не допонимаю, может какая фича ...
Эта проблема не позволяет использовать в сервисах ряд библиотек, например: fblib, zeoslib.

Может кто подскажет как лечить или где копать.
Спасибо.

[Bupyc]

Посмотри, задана ли переменная WakeMainThread. Она находится в модуле Classes. В ней должна храниться ссылка на метод объекта, который каким то образом дёргает главный поток приложения и передаёт ему ссылку на метод, который надо исполнить. Если она равна NIL, то Synchronize работать точно не будет. Если не NIL, то надо смотреть, ссылка на что лежит в WakeMainThread и как это всё работает.

Добавлено спустя 13 минут 13 секунд:
Я сталкивался с подобной ситуацией в Delphi. Synchronize перестаёт работать, если приложение не использует библиотеку VCL. В этом случае нужно делать некие телодвижения, что бы инициализировалась переменная WakeMainThread. Т.к. в заголовке своего сообщения, ты написал, что работаешь с WinXP, то можешь попробовать использовать мой модуль, который скорее всего решит твою проблему. Его нужно просто прикомпилировать к приложению добавив в секцию uses в *.lpr. Модуль писался для дельфей, но, думаю, что и в FPC он должен заработать без проблем.

[1g0r]

Cпасибо за ответ....

Да действительно WakeMainThread ревен nil
Поискав по исходникам FPC, не нашел места где бы он инициализировался....
Пробовал использовать твой модуль, проблемы таки есть в AllocateHWnd
В FPC он реализован таким образом

Код: Выделить всё

function AllocateHWnd(Method: TWndMethod): HWND;
  begin
    { dummy }
    runerror(217);
    Result:=0;
  end;

(в общем не реализован)
Но направление поиска я получил, еще раз спасибо

[Bupyc]

Если WakeMainThread = NIL, то вернее всего это не баг, это фича Т.е. так и должно быть. Хотя, когда я реанимировал Synchronize в WinMobile'овской версии LCL, это всё таки был баг Что бы мой модуль скомпилировался, можно попробовать взять функции AllocateHwnd и DeAllocateHwnd из дельфей. Они, на первый взгляд, вроди бы без какой-либо привязки к VCL реализованы.

[Angel_19]

Похожая проблема, как ее решить?

[iN0k]

На мой взгляд тут не целевое использование метода Synchronize связанное с не пониманием.
Когда мы пишем оконное приложение у нас ВСЕГДА есть ОЧЕВИДНЫЙ главный поток (который разгребает очередь сообщений приложения и завершение которого влечет за собой закрытие приложения). Именно в нем и "выполняется" Synchronize, который необходим для нормальной работы в условиях "однопоточности VCL".
В сервисах же такого потока НЕТ. Сам "сервис" построен на других принципах взаимодействия с системой. Поэтому Synchronize тут и не должен работать. Можно втащить VCL в сервис (что на мой взгляд не правильно, так как это ошибка архетиктуры ПО), но есть более элегантные методы.

а лучше поучить матЧасть ... и показать где я не прав

[hinst]

Не получается выполнить Synchronize, ну ладно, а нужно ли это делать? и зачем это делать? синхронизировать что с чем собрались?

[Angel_19]

Не получается выполнить Synchronize, ну ладно, а нужно ли это делать? и зачем это делать? синхронизировать что с чем собрались?

Разные потоки внутри сервиса.