IMsProblemCalculation.SaveHistoryMask

Синтаксис

SaveHistoryMask: MsCalculationHistorySet;

Описание

Свойство SaveHistoryMask определяет параметры ведения журнала расчёта задачи моделирования.

Комментарии

На значение данного свойства влияет свойство IMsProblemCalculation.SaveHistory. Если свойству IMsProblemCalculation.SaveHistory установить значение True, то SaveHistoryMask примет значение MsCalculationHistorySet.Full.

Значение данного свойства также влияет на свойство IMsProblemCalculation.SaveHistory. Если для значения SaveHistoryMask установить любой тип MsCalculationHistorySet, кроме MsCalculationHistorySet.None, то IMsProblemCalculation.SaveHistory автоматически принимает значение True. Если в качестве значения SaveHistoryMask установить MsCalculationHistorySet.None, то IMsProblemCalculation.SaveHistory принимает значение False.

Пример

Для выполнения примера предполагается наличие в репозитории контейнера моделирования с идентификатором KONT_MODEL. В данном контейнере должна содержаться задача с идентификатором PROBLEM_1.

Sub UserProc;
Var
    MB: IMetabase;
    MObj: IMetabaseObject;
    Problem: IMsProblem;
    CalcSett: IMsProblemCalculationSettings;
    Calculation: IMsProblemCalculation;
Begin
    MB := MetabaseClass.Active;
    MObj := MB.ItemByIdNamespace("PROBLEM_1", MB.ItemById("KONT_MODEL").Key).Edit;
    Problem := MObj As IMsProblem;
    CalcSett := Problem.CreateCalculationSettings;
    Calculation := Problem.Calculate(CalcSett);
    Calculation.SaveHistory := True;
    Calculation.SaveHistoryMask := MsCalculationHistorySet.Log;
    Calculation.Run;
    MObj.Save;
End Sub UserProc;

После выполнения примера будет осуществлён расчёт задачи с идентификатором PROBLEM_1. История расчёта будет сохранена только в виде журнала.

См. также:

IMsProblemCalculation