Не разу не писал в журнал событий все как-то файлами пользовался, а тут
решил попробовать....
Запускается в сервисе:
LogMessage('Error connect DB',EVENTLOG_ERROR_TYPE);
Отрабатывает без ошибок, но в раздел приложений EVENTLOG после не зайти,
выдает "AppName: mmc.exe AppVer: 5.1.2600.2180 ModName: ntdll.dll
ModVer: 5.1.2600.2180 Offset: 00036bd1" и EVENTLOG завершается.