ILanerAttributeColumns.Clear

Синтаксис

Clear;

Описание

Метод Clear осуществляет удаление всех атрибутов из коллекции.

Пример

Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «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;

If LanerAttr.Count > 0 Then

LanerAttr.Clear;

End If;

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

Attr := Rubrikator.Facts.Attributes;

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

Laner.EndUpdate;

End Sub Button1OnClick;

Пример будет выполняться при нажатии на кнопку. Если в коллекции отображаемых атрибутов ряда есть элементы, то она будет очищена. Затем в нее будет добавлен атрибут «Ревизия».

См. также:

ILanerAttributeColumns