Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.01.13;
Скачать: CL | DM;

Вниз

GetCurrentThread() в Service   Найти похожие ветки 

 
AlexandrRya   (2002-11-24 00:01) [0]

Короче, при вызове GetCurrentThread() в процедуре обработки события OnExecute сервиса возвращается какая-то ерунда. Сервис запускается при загрузке системы.
Проблема в общем-то в том, как узнать привилегии своей нитки из сервиса, так, что если есть другие варианты, то можно рассмотреть и их (без GetCurrentThread())


 
Vasily Terekhov   (2002-11-27 10:32) [1]

К сожалению, TApplication у сервиса не имеет явно handle :(
Я обмынывал так:

var
wnd: HWND;
.....
wnd := FindWindow("TApplication", "<Имя exe-сервиса>");

А вот по hwnd окна сервиса можно узнать процесс:

var
Process, Tread : Cardinal;
....
Tread := GetWindowThreadProcessId(wnd, @Process);




Страницы: 1 вся ветка

Текущий архив: 2003.01.13;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.013 c
1-37137
jen_bond
2002-12-29 12:15
2003.01.13
Перекрывание компанентов


3-36920
asusfi
2002-12-17 13:37
2003.01.13
Lookup поле


1-37047
Pat
2003-01-02 18:03
2003.01.13
Запуск ДОС-приложения


1-37134
jen_bond
2002-12-29 09:51
2003.01.13
Узнать номер компанента


3-36947
Dbrf
2002-12-17 13:23
2003.01.13
Удаление строк подчинённой таблицы