ISecurityPackageUserData.AllPrivilegies

Синтаксис

AllPrivilegies: Integer;

Описание

Свойство AllPrivilegies возврщает общее количество привилегий у данного пользователя.

Пример

Sub Main;

Var

MB: IMetabase;

LoS: ILogonSession;

Mu: IMetabaseUser;

SPUD: ISecurityPackageUserData;

i: integer;

Begin

MB:=MetabaseClass.Active;

LoS:=MB.LogonSession;

Mu:=Los.User;

SPUD:=Mu.PackageData;

i:=SPUD.AllPrivilegies;

End Sub Main;

После выполнения примера в переменной «i» будет содержаться общее количество привилегий у данного пользователя.

См. также:

ISecurityPackageUserData