SaveHistory: Boolean;
Свойство SaveHistory определяет, будет ли сохраняться история расчета задачи в контейнере моделирования.
По умолчанию свойству установлено значение False, при этом история расчета не сохраняется.
Если свойству SaveHistory установить значение True, то IMsProblemCalculation.SaveHistoryMask примет значение MsCalculationHistorySet.Full.
На значение данного свойства влияет свойство IMsProblemCalculation.SaveHistoryMask. Если для значения IMsProblemCalculation.SaveHistoryMask установить любой тип MsCalculationHistorySet, кроме MsCalculationHistorySet.None, то SaveHistory автоматически принимает значение True. Если в качестве значения IMsProblemCalculation.SaveHistoryMask установить MsCalculationHistorySet.None, то SaveHistory автоматически принимает значение False.
Для выполнения примера предполагается наличие в репозитории контейнера моделирования с идентификатором «KONT_MODEL». В данном контейнере должна содержаться задача с идентификатором «PROBLEM_1».
Sub Main;
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.Run;
MObj.Save;
End Sub Main;
После выполнения примера будет осуществлен расчет задачи с идентификатором «PROBLEM_1». Полная история расчета будет сохранена.
См. также: