Count: Integer;
The Count property returns the number of series in collection.
Executing the example requires a form with the Button1 button, the TabSheetBox component and the UiErAnalyzer component named UiErAnalyzer1 which is used as 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;
LSerieList: ILanerSerieList;
Serie: ILanerSerie;
i: integer;
Begin
ErAn := UiErAnalyzer1.ErAnalyzer;
Laner := ErAn.Laner;
LSerieList := Laner.SeriesList;
Debug.WriteLine("The count of series in the working area: " + LSerieList.Count.ToString);
Debug.WriteLine("Time 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 this example the number of series, that are contained in the working area, and also the series keys are displayed in console window.
See also: