Manager: IMetabaseManager;
Свойство Manager позволяет получить менеджер, в котором зарегистрирован репозиторий, соответствующий текущему описанию.
Sub UserProc;
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 UserProc;
После выполнения примера в переменной «Count» будет содержаться количество описаний репозиториев, зарегистрированных на текущей рабочей станции.
См. также: