ILanerAttributes.Count

Syntax

Count: Integer;

Description

The Count property returns the number of attributes in the collection.

Example

Executing the example requires a form with the Button1 button, the TabSheetBox component and the UiErAnalyzer component named UiErAnalyzer1 that is a data source for TabSheetBox. Working area of the time series database must be loaded to UiErAnalyzer1. Click the button to start executing this example.

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

Var

ErAn: IEaxAnalyzer;

Laner: ILaner;

Rubrikator: IRubricator;

Attr: IMetaAttributes;

LanerAttr: ILanerAttributes;

Begin

ErAn := UiErAnalyzer1.ErAnalyzer;

Laner := ErAn.Laner;

Laner.BeginUpdate;

Rubrikator := Laner.RubricatorInstance.Rubricator;

Attr := Rubrikator.Facts.Attributes;

LanerAttr := Laner.Attributes;

If LanerAttr.Count > 0 Then

LanerAttr.Clear;

End If;

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

Laner.EndUpdate;

End Sub Button1OnClick;

After executing this example, attributes collection is cleared. Then an additional Revision attribute is displayed for series in a data table.