Count: Integer;
The Count property returns the number of series in collection.
Executing the example requires a form with the following components: the Button component named Button1, the TabSheetBox component named TabSheetBox1, and the UiErAnalyzer component named UiErAnalyzer1. UiErAnalyzer1 is a data source for TabSheetBox1. A workbook of the time series database should be loaded to UiErAnalyzer1.
The example is a handler of the OnClick event for the Button1 component.
Add links to the Express, ExtCtrls, Forms, Laner, and Tab system assemblies.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
ErAn: IEaxAnalyzer;
Laner: ILaner;
LSerieList: ILanerSerieList;
Serie: ILanerSerie;
i: integer;
Begin
ErAn := UiErAnalyzer1.ErAnalyzer;
Laner := ErAn.Laner;
LSerieList := Laner.SeriesList;
Debug.WriteLine("Number of working area series: " + LSerieList.Count.ToString);
Debug.WriteLine("Series keys:");
For i := 0 To LSerieList.Count - 1 Do
Serie := LSerieList.Item(i);
Debug.WriteLine(Serie.Key);
End For;
End Sub Button1OnClick;
After executing the example the console window displays the number of series contained in the working area and also the series keys.
See also: