Count: Integer;
Свойство Count возвращает количество рядов в коллекции.
Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с идентификатором «Button1», компонента TabSheetBox и компонента UiErAnalyzer с наименованием «UiErAnalyzer1», являющегося источником данных для TabSheetBox. В «UiErAnalyzer1» должна быть загружена рабочая область базы данных временных рядов.
Пример будет выполняться при нажатии на кнопку.
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("Количество рядов в рабочей области: " + LSerieList.Count.ToString);
Debug.WriteLine("Ключи рядов:");
For i := 0 To LSerieList.Count - 1 Do
Serie := LSerieList.Item(i);
Debug.WriteLine(Serie.Key);
End For;
End Sub Button1OnClick;
После выполнения примера в окно консоли будут выведено количество рядов, содержащихся в рабочей области, а также их ключи.
См. также: