Главная страница
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.02 c
14-15888
Вольный Стрелок
2003-01-16 19:36
2003.02.06
локализация интерфейса приложений


8-15768
vixic
2002-10-23 10:10
2003.02.06
Рисунок на канву Panel?


6-15799
Stimo
2002-12-10 21:47
2003.02.06
TServerSocket TClientSocket отсутствуют в Delphi 7


14-15920
Yury
2003-01-21 11:07
2003.02.06
FastNet


14-15818
Феликс
2003-01-18 14:46
2003.02.06
Показы?