Вниз
Скачать: CL | DM;

THandle   Найти похожие ветки 

 
Tosov ©   (2001-12-18 00:46) [0]


var
h:THandle;

procedure xxx;
begin
if chegoto then h:=OpenProcess(....)
else h:=OpenService(...);
lalala(h);
end;

procedure lalala(th:THandle);
begin
Как здесь определить что это за THandle (процесса, сервиса или чего -то еще) и узнать его права (All_Access,Read...)??
Это просто пример - не надо предлагать передавать chegoto- надо именно инфу о handle.
end;


 
Raptor ©   (2001-12-19 01:15) [1]

ИМХО, никак.


 
Tosov ©   (2001-12-19 05:20) [2]

Жаль :(


 
ИгорЁк   (2001-12-20 10:46) [3]

А если попробовать вызвать QueryServiceConfig с полученным хэндлом?
Если вернет false, a GetLastError вернет ERROR_INVALID_HANDLE - значит не сервис



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

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



Память: 0.45 MB
Время: 0.005 c
3-56972
EternalWonderer
2002-01-10 15:25
2002.02.18
работа с компонентами DOA


3-56980
sync
2002-01-22 09:11
2002.02.18
Как в Оракле выбрать нужные записи из таблицы с помощью хранимой процедуры?


1-57082
Злой_Гном
2002-02-01 18:12
2002.02.18
Помогите положить ProgressBar в StatusBar.Panels


3-57027
Axex12
2002-01-25 04:36
2002.02.18
Как вывести результат суммы по столбцу?


14-57221
ProfiUgl
2001-12-27 16:07
2002.02.18
Откуда можно скачать Update Pack 1 для Delphi5 и ADO Express Update 1 и 2




   Наверх