Count: Integer;
Свойство Count возвращает количество описаний репозиториев, зарегистрированных на рабочей станции.
Sub Main;
Var
Man: IMetabaseManager;
Defs: IMetabaseDefinitions;
Def: IMetabaseDefinition;
Begin
Man := MetabaseManagerFactory.Active;
Defs := Man.Definitions;
Debug.WriteLine(Defs.Count);
End Sub Main;
После выполнения примера в консоль среды разработки будет выведено количество описаний репозиториев, зарегистрированных в менеджере репозиториев.
См. также: