ILanerCalculateGroupSerie.SaveModel

Синтаксис

SaveModel: IMetabaseObjectDescriptor;

Описание

Метод SaveModel осуществляет сохранение группы вычисляемых рядов в модель.

Пример

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

Пример будет выполняться при нажатии на кнопку.

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("Группа вычисляемых рядов: " + GroupSerie.Name);

Memo1.Lines.Add("Ошибки: " + GroupSerie.Error);

GroupSerie.SaveModel;

Memo1.Lines.Add("Группа сохранена в модель: " + GroupSerie.Model.Name);

End If;

End For;

End Sub Button1OnClick;

После выполнения примера группа вычисляемых рядов будет сохранена в модель. В компонент «Memo1», будет выведена информация наименовании модели и об ошибках, возникших при расчете ряда.

См. также:

ILanerCalculateGroupSerie