ISecurityPackageUserData.IsGroup

Синтаксис Fore

IsGroup: Boolean;

Синтаксис Fore.NET

IsGroup: Boolean;

Описание

Свойство IsGroup определяет признак того, является ли пользователь пакета безопасности членом группы.

Пример Fore

Для выполнения примера подключите ссылку на сборку Metabase.

Sub UserProc;
Var
    MB: IMetabase;
    LoS: ILogonSession;
    Mu: IMetabaseUser;
    SPUD: ISecurityPackageUserData;
    Grp: Boolean;
Begin
    MB:=MetabaseClass.Active;
    LoS:=MB.LogonSession;
    Mu:=Los.User;
    SPUD:=Mu.PackageData;
    Cr:=SPUD.IsGroup;
    Debug.WriteLine (Grp);
End Sub UserProc

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

Пример Fore.NET

Указанный пример является точкой ввода для какой-либо NET. сборки.

Public Shared Sub Main(Params : StartParams);
Var
    MB: IMetabase;
    LoS: ILogonSession;
    Mu: IMetabaseUser;
    SPUD: ISecurityPackageUserData;
    GRP: Boolean;
Begin
    MB:=Params.Metabase;
    LoS:=MB.LogonSession;
    Mu:=Los.User;
    SPUD:=Mu.PackageData;
    GRP:=SPUD.IsGroup;
    System.Diagnostics.Debug.WriteLine (GRP);
End Sub Main;

См. также: