Clear;
The Clear method clears all attributes from the collection.
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.
See also: