Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.012 c
7-37418
SSA
2002-10-31 12:46
2003.01.13
Работа с COM портом


4-37445
Spyx
2002-11-22 14:43
2003.01.13
Процессы


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


14-37364
Prooksius
2002-12-24 21:32
2003.01.13
Не могу поставить FIBPlus 4.77 под Delphi 7


3-36954
Борис
2002-12-16 17:02
2003.01.13
Русские буквы в IB 6




   Наверх