ISecurityPackageUserData.HasPrivilege

Свойство HasPrivilege определяет, обладает ли пользователь заданной привилегией.

Пример

Sub UserProc;
Var
    MB: IMetabase;
    LoS: ILogonSession;
    Mu: IMetabaseUser;
    SPUD: ISecurityPackageUserData;
Begin
    MB := MetabaseClass.Active;
    LoS := MB.LogonSession;
    Mu := Los.User;
    SPUD := Mu.PackageData;
    Debug.WriteLine(SPUD.HasPrivilege(SecurityPackageUserPrivilege.ClearJournal)?
        "У пользователя " + Mu.Name + " имеется привилегия очистки протокола доступа.":
        "У пользователя " + Mu.Name + " нет привилегии очистки протокола доступа.");
End Sub UserProc;

При выполнении примера в консоль среды разработки будет выведена информация о наличии или отсутствии у текущего пользователя привилегии очистки протокола доступа.

ISecurityPackageUserData.HasPrivilege

Синтаксис

Параметры

Описание

Пример