Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.18;
Скачать: [xml.tar.bz2];




Вниз

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 - значит не сервис




Форум: "WinAPI";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.18;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.025 c
1-57122           fag2000@ok.ru         2002-02-01 14:39  2002.02.18  
А где можно найти статьи, примеры разработки COM+ серверов и клиентов?


6-57178           Алиса                 2001-10-16 11:14  2002.02.18  
Имя пользователя на сетевом компьютере


6-57179           D. Aseev              2001-11-26 00:17  2002.02.18  
Можно ли заставить NMSMTP кодировать мессаги в koi-8r или какие самые хорошие компоненты для этого есть(с русскими кодир. работать)?


1-57112           MAN-IN-RED            2002-02-02 21:32  2002.02.18  
Какие форматы знает MediaPlayer?


3-56990           vopros                2002-01-23 13:57  2002.02.18  
Индексы изнасиловали меня в конец...