Manager: IMetabaseManager;
Свойство Manager позволяет получить менеджер, в котором зарегистрирован репозиторий, соответствующий текущему описанию.
Sub Main;
Var
MB: IMetabase;
Def: IMetabaseDefinition;
Man: IMetabaseManager;
Count: Integer;
Begin
MB:=MetabaseClass.Active;
Def:=MB.Definition;
Man:=Def.Manager;
Count:=Man.Definitions.Count;
End Sub Main;
После выполнения примера в переменной «Count» будет содержаться количество описаний репозиториев на данной рабочей станции.
См. также: