Groups: IMetabaseGroups;
The Groups property returns collection of users groups, created in the current repository.
By default the Administrators built-in group has the 0 index (first group).
Sub Main;
Var
MB: IMetabase;
MS: IMetabaseSecurity;
Groups: IMetabaseGroups;
Group: IMetabaseGroup;
Begin
MB := MetabaseClass.Active;
MS := MB.Security;
Groups := MS.Groups;
For Each Group In Groups Do
Debug.WriteLine(Group.Name);
End For;
End Sub Main;
After executing the example names of all users groups, created in the current repository, are displayed in the development environment console.
See also: