IsGroup: Boolean;
IsGroup: Boolean;
The IsGroup property indicates whether the security package user is a group member.
If the property returns False, the current user is not a group member. Otherwise the property returns True.
To execute the example, add a link to the Metabase assembly.
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
After executing this example the console window shows a message that informs whether the current user is a group member.
This example is an entry point for a .NET. assembly.
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;
After executing this example the console window shows a message that informs whether the current user is a group member.
See also: