Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.02.18;
Скачать: 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 вся ветка

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

Наверх




Память: 0.47 MB
Время: 0.011 c
14-57205
fliz
2001-12-28 12:16
2002.02.18
НАРОД!!! СРОЧНО надо найти картинку ЧЕРТА ЛЫСОГО!


3-57025
demon ltd
2002-01-25 00:10
2002.02.18
запись из базы в edit, Combobox1 и так даллее


6-57165
Zharik
2001-11-28 12:41
2002.02.18
Как в Delphi пройти через прокси-сервер, в котором есть имя и пароль?


6-57158
serg2000
2001-11-25 11:41
2002.02.18
Глупый вопрос


1-57094
lvovich
2002-02-02 10:45
2002.02.18
Модальные окна