Clear;
The Clear method removes all the series from the set.
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;
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);
SerSet.Clear;
End Sub Button1OnClick;
After executing the example a copy is created for each series in the workbook. After that the set of the copied series is cleared.
See also: