MetaAttributeSettings: IMetaAttributeSettings;
Свойство MetaAttributeSettings возвращает настройки атрибутов базы данных временных рядов, связанной с компонентом MetaAttributesBreadcrumb.
Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с идентификатором «Button1», компонента MetaAttributesBreadcrumb с идентификатором «MetaAttributesBreadcrumb1» и компонента MetaAttributesTreeList с идентификатором «MetaAttributesTreeList1». В репозитории должна присутствовать база данных временных рядов с идентификатором OBJ_FC. В данной базе должен присутствовать пользовательский атрибут показателей «COUNTRY», ссылающийся на справочник.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
MB: IMetabase;
RubDesc: IMetabaseObjectDescriptor;
RubrIn: IRubricatorInstance;
DictInst: IMetaDictionaryInstance;
Dict: IMetaDictionary;
AttrS: IMetaAttributeSettings;
Attr: IMetaAttributeSetting;
Begin
MB := MetabaseClass.Active;
RubDesc := MB.ItemById("OBJ_FC");
MetaAttributesTreeList1.Rubricator := RubDesc.Bind As IRubricator;
MetaAttributesTreeList1.Breadcrumb := MetaAttributesBreadcrumb1;
RubrIn := RubDesc.Open(Null) As IRubricatorInstance;
MetaAttributesBreadcrumb1.Rubricator := RubrIn;
DictInst := RubrIn.GetDictionary(RubricatorDictionary.Facts);
Dict := (dictInst As IMetabaseObjectInstance).Object As IMetaDictionary;
MetaAttributesTreeList1.Dictionary := Dict;
MetaAttributesBreadcrumb1.Dictionary := DictInst;
MetaAttributesBreadcrumb1.MetaAttributes := Dict.Attributes;
AttrS := MetaAttributesBreadcrumb1.MetaAttributeSettings;
Attr := AttrS.FindById("COUNTRY");
Attr.NamingFormat := "KEY";
End Sub Button1OnClick;
После выполнения примера для атрибута «COUNTRY» будет изменен формат наименования.
См. также: