Скачать: 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 вся ветка

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



Память: 0.45 MB
Время: 0.013 c