ILanerAttributeColumns.Add

Синтаксис

Add(Attribute: IMetaAttribute): ILanerAttributeColumn;

Параметры

Attribute. Добавляемый атрибут.

Описание

Метод Add осуществляет добавление атрибута в коллекцию.

Примечание. Метод устарел, используйте ILanerAttributeColumns.AddByType.

Пример

Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1», компонента TabSheetBox и компонента UiErAnalyzer с наименованием «UiErAnalyzer1», являющегося источником данных для TabSheetBox. В «UiErAnalyzer1» должна быть загружена рабочая область базы данных временных рядов.

Пример будет выполняться при нажатии на кнопку.

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);

Var

ErAn: IEaxAnalyzer;

Laner: ILaner;

Rubrikator: IRubricator;

Attr: IMetaAttributes;

LanerAttr: ILanerAttributeColumns;

Begin

ErAn := UiErAnalyzer1.ErAnalyzer;

Laner := ErAn.Laner;

Laner.BeginUpdate;

Rubrikator := Laner.RubricatorInstance.Rubricator;

// Отображение дополнительного атрибута

LanerAttr := Laner.AttributeColumns;

Attr := Rubrikator.Facts.Attributes;

LanerAttr.Add(Attr.FindById("REV"));

Laner.EndUpdate;

End Sub Button1OnClick;

После выполнения примера в коллекцию отображаемых атрибутов будет добавлен дополнительный атрибут «Ревизия».

См. также:

ILanerAttributeColumns