SetAttributeValue(Attribute: IMetaAttribute; Value: IDimSelection);
SetAttributeValue(Attribute: Prognoz.Platform.Interop.Rds.IMetaAttribute; Value: Prognoz.Platform.Interop.DimensionsDimSelection);
Attribute. Атрибут, по которому необходимо установить отметку.
Value. Отметка элементов, которую необходимо установить по атрибуту Attribute.
Метод SetAttributeValue устанавливает отметку показателей по атрибуту Attribute.
Атрибут, указываемый в качестве значения параметра Attribute, можно получить в коллекции IMetaAttributesBreadcrumb.MetaAttributes. Отметку для атрибута возвращает метод IMetaAttributesBreadcrumb.GetAttributeValue.
Для выполнения примера предполагается наличие формы, расположенной на ней кнопки и компонента MetaAttributesBreadcrumb с наименованием «MetaAttributesBreadcrumb1». В компоненте «MetaAttributesBreadcrumb1» отображаются данные базы данных временных рядов, содержащей атрибут «COUNTRY».
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
Attrs: IMetaAttributes;
Attr: IMetaAttribute;
Sel: IDimSelection;
Begin
Attrs := MetaAttributesBreadcrumb1.MetaAttributes;
Attr := Attrs.FindById("COUNTRY");
Sel := MetaAttributesBreadcrumb1.GetAttributeValue(Attr);
Sel.DeselectAll;
Sel.SelectElement(0, False);
Sel.SelectElement(1, False);
Sel.SelectElement(2, False);
MetaAttributesBreadcrumb1.SetAttributeValue(Attr, Sel);
End Sub Button1OnClick;
После выполнения примера при нажатии на кнопку будет изменена отметка элементов по атрибуту «COUNTRY». По данному атрибуту будут отмечены первые три элемента.
Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore. Вместо компонентов Fore используйте их Fore.NET аналоги.
Imports Prognoz.Platform.Interop.Dimensions;
Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Rds;
Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
Attrs: IMetaAttributes;
Attr: IMetaAttribute;
Sel: IDimSelection;
Begin
Attrs := MetaAttributesBreadcrumbNet1.MetaAttributes;
Attr := Attrs.FindById("COUNTRY");
Sel := MetaAttributesBreadcrumbNet1.CtrlBox.GetAttributeValue(Attr);
Sel.DeselectAll();
Sel.SelectElement(0, False);
Sel.SelectElement(1, False);
Sel.SelectElement(2, False);
MetaAttributesBreadcrumbNet1.CtrlBox.SetAttributeValue(Attr, Sel);
End Sub;
См. также: