IMetabaseSecurity.Groups

Синтаксис

Groups: IMetabaseGroups;

Описание

Свойство Groups возвращает коллекцию групп пользователей, созданных в текущем репозитории.

Комментарии

По умолчанию встроенная группа Администраторов имеет индекс 0 (первая группа).

Пример

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;

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

См. также:

IMetabaseSecurity