MetaAttributes: IMetaAttributes;
The MetaAttributes property determines attributes of a time series database displayed in the MetaAttributesBreadcrumb component.
Executing the example requires a form with a button with the Button1 identifier and the MetaAttributesBreadcrumb component with the MetaAttributesBreadcrumb1 identifier. Time series database with the OBJ_FC identifier must be located in repository. Click the button to start executing this example.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
mb: IMetabase;
rubDescr: IMetabaseObjectDescriptor;
dict: IMetaDictionary;
dictInst: IMetaDictionaryInstance;
rubInst: IRubricatorInstance;
Begin
mb := MetabaseClass.Active;
rubDescr := mb.ItemById("OBJ_FC");
rubInst := rubDescr.Open(Null) As IRubricatorInstance;
dictInst := rubInst.GetDictionary(RubricatorDictionary.Facts);
If dictInst <> Null Then
dict := (dictInst As IMetabaseObjectInstance).Object As IMetaDictionary;
MetaAttributesBreadcrumb1.Dictionary := dictInst;
MetaAttributesBreadcrumb1.MetaAttributes := dict.Attributes;
End If;
End Sub Button1OnClick;
After executing the example the MetaAttributesBreadcrumb component is set for the factors dictionary of a time series database.
See also: