PrivilegeName(Index: Integer): String;
Index. Индекс привилегии.
Свойство PrivilegeName возвращает наименование привилегии по индексу.
Доступное количество привилегий возвращает свойство PrivilegeCount.
Для выполнения примера добавьте ссылку на системную сборку Metabase.
Sub UserProc;
Var
Mb: IMetabase;
Policy: IMetabasePolicy;
i, c: Integer;
Begin
Mb := MetabaseClass.Active;
Policy := Mb.Security.Policy;
// Доступное количество привилегий
c := Policy.PrivilegeCount;
// Наименования привилегий
For i := 0 To c - 1 Do
Debug.WriteLine(Policy.PrivilegeName(i));
End For;
End Sub UserProc;
При выполнении примера в консоль среды разработки будут выведены наименования привилегий, доступных в менеджере безопасности.
См. также: