ILanerSeriesSet.Remove

Синтаксис

Remove(Index: Integer): Boolean;

Параметры

Index - индекс удаляемого ряда.

Описание

Метод Remove удаляет указанный ряд из набора.

Пример

Для выполнения примера предполагается наличие формы, расположенной на ней кнопки с наименованием «Button1», компонента TabSheetBox и компонента UiErAnalyzer с наименованием «UiErAnalyzer1», являющегося источником данных для TabSheetBox. В «UiErAnalyzer1» должна быть загружена рабочая книга базы данных временных рядов.

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);

Var

ErAn: IEaxAnalyzer;

Laner: ILaner;

LanSers: ILanerSeries;

SerSet: ILanerSeriesSet;

Serie: ILanerSerie;

i: Integer;

Begin

ErAn := UiErAnalyzer1.ErAnalyzer;

Laner := ErAn.Laner;

LanSers := Laner.Series;

SerSet := LanSers.CreateSet;

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

Serie := LanSers.Item(i);

SerSet.Add(Serie);

End For;

LanSers.Copy(SerSet);

LanSers.Paste(0);

For i := 1 To SerSet.Count - 1 Do

SerSet.Remove(i);

End For;

End Sub Button1OnClick;

После выполнения примера для каждого ряда в рабочей книге будет создана копия. Затем из набора копируемых рядов будут удалены все элементы, кроме первого.

См. также:

ILanerSeriesSet