ILanerCalculateGroupSerie.Model

Syntax

Model: IMetabaseObjectDescriptor;

Description

The Model property determines the model, into which the group of calculated series was saved or from which it was restored.

Example

Executing the example requires a form with the Button1 button, the Memo component with the Memo1 identifier, 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. The working area must contain a group of calculated series.

Click the button to start executing the example.

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

Var

ErAn: IEaxAnalyzer;

Laner: ILaner;

Serie: ILanerSerie;

GroupSerie: ILanerCalculateGroupSerie;

j: Integer;

Begin

ErAn := UiErAnalyzer1.ErAnalyzer;

Laner := ErAn.Laner;

For j := 0 To Laner.SeriesList.Count - 1 Do

Serie := Laner.SeriesList.Item(j);

If Serie.Kind = LnSerieKind.CalculateGroup Then

GroupSerie := Serie As ILanerCalculateGroupSerie;

GroupSerie.Expanded := True;

Memo1.Lines.Add("Calculated series group: " + GroupSerie.Name);

Memo1.Lines.Add("Errors: " + GroupSerie.Error);

GroupSerie.SaveModel;

Memo1.Lines.Add("Group is saved to the model: " + GroupSerie.Model.Name);

End If;

End For;

End Sub Button1OnClick;

After executing the example the group of calculated series is saved to the model. The information about the model name and the errors, that occurred during the series calculation, is displayed in the Memo1 component.