IMsProblem.RestoreLaner

Syntax

RestoreLaner(Laner: ILaner; ParamValues: IMsModelParamValues);

Parameters

Laner. Working area of the time series database.

ParamValues. Parameters with which the problem is restored. If the problem parameters are not defined, the Null value should be specified.

Description

The RestoreLaner method restores working area of time series database from a problem.

Example

Executing the example requires a form, a button with the Button1 identifier on this form, the TabSheetBox component and the UiErAnalyzer component named UiErAnalyzer1 that is used as a data source for TabSheetBox. Workbook of the time series database must be loaded to UiErAnalyzer1. Modeling container of this database must include a problem with the OBJ_PROBLEM identifier.

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

Var

ErAn: IEaxAnalyzer;

Laner: ILaner;

ActiveMetabase: IMetabase;

Rub: IRubricator;

Cont: IMetabaseObjectDescriptor;

Problem: IMsProblem;

Begin

ErAn := UiErAnalyzer1.ErAnalyzer;

Laner := ErAn.Laner;

Rub := Laner.RubricatorInstance.Rubricator;

Cont := Rub.ModelSpace;

ActiveMetabase := MetabaseClass.Active;

Problem := ActiveMetabase.FetchItemById("OBJ_PROBLEM", Cont.Key).Edit As IMsProblem;

Problem.RestoreLaner(Laner, Null);

End Sub Button1OnClick;

On clicking the Button1 button the series from the OBJ_PROBLEM problem are restored to the time series database workspace.