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

Вниз

Как программно узнать название группы администраторов?   Найти похожие ветки 

 
kingdom ©   (2003-01-27 11:47) [0]

На русских виндах она называется "Администраторы",
на английских "Administrators" и вообще пользователь может ее переименовать!

А как узнать название группы?


 
Игорь Шевченко ©   (2003-01-27 11:59) [1]

LookupAccountName


 
kingdom ©   (2003-01-27 13:31) [2]

>Игорь Шевченко
А у Вас есть какой-нибудь пример, а то у меня почему то ошибку постоянно выдает.


 
Игорь Шевченко ©   (2003-01-27 13:53) [3]

У меня готового нет, пример у Рихтера в синей книге. (Рихтер, Кларк, разработка серверных приложений для Windows 2000)


 
kingdom ©   (2003-01-27 17:41) [4]

Вот разобрался, вожет кому еще пригодиться


function GetAdminGroup : string;
var
SID : PSID;
GroupName, DomainName : array[0..30]of Char;
GroupLen, DomainLen : DWORD;
peUse : SID_NAME_USE;
begin
GroupLen := Length(GroupName);
DomainLen := Length(DomainName);
ConvertStringSidToSid("S-1-5-32-544", SID);
LookupAccountSid(
nil,
SID,
@GroupName,
GroupLen,
@DomainName,
DomainLen,
peUse
);
result := GroupName;
end;



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

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

Наверх




Память: 0.47 MB
Время: 0.015 c
1-15560
Masa
2003-01-28 16:37
2003.02.06
TStringGrid


4-16008
Cobalt
2002-12-22 01:06
2003.02.06
PSAPI.pas


7-15955
9999
2002-11-05 17:56
2003.02.06
Убить процесс при помощи Delphi


3-15414
Жук
2003-01-21 15:26
2003.02.06
Аppend


1-15591
_saha_
2003-01-28 21:59
2003.02.06
Есть вопросик