ILanerAttributeColumn.MetaAttribute

Syntax

MetaAttribute: IMetaAttribute;

Description

The MetaAttribute property returns the displayed attribute.

Example

Executing the example requires a form with the Button1 button, the Memo component named Memo1, 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;

LanerAttr: ILanerAttributeColumns;

LanerA: ILanerAttributeColumn;

i: Integer;

Begin

ErAn := UiErAnalyzer1.ErAnalyzer;

Laner := ErAn.Laner;

LanerAttr := Laner.AttributeColumns;

If LanerAttr.Count = 0

Then

Memo1.Lines.Add("Additional displayed attributes are not defined for series");

Else

For i := 0 To LanerAttr.Count - 1 Do

LanerA := LanerAttr.Item(i);

Memo1.Lines.Add("Attribute name: " + LanerA.MetaAttribute.Name);

Memo1.Lines.Add(" The attribute is only for reading: " + LanerA.ReadOnly.ToString);

End For;

End If;

End Sub Button1OnClick;

After executing this example, names of additional displayed attributes and their availability for editing are displayed in the Memo component.