ICalcBlockIteratorModel.IsDirty

Синтаксис

IsDirty: Boolean;

Отсутствует;

Описание

Свойство IsDirty возвращает признак наличия изменений в настройках источников данных.

Комментарии

Допустимые значения:

Пример

Для выполнения примера предполагается наличие в репозитории алгоритма расчёта с идентификатором ALGORITHM. В алгоритме создан и настроен блок расчёта.

Добавьте ссылки на системные сборки: Algo, Metabase. Также добавьте ссылки на сборки, которые необходимы для работы с алгоритмами расчёта.

Sub UserProc;
Var
    MB: IMetabase;
    MObj: IMetabaseObjectDescriptor;
    Algo: ICalcObject;
    CalcAlgo: ICalcAlgorithm;
    CalcBlock: ICalcBlock;
    CalcBlockIteratorModel: ICalcBlockIteratorModel;
    CalcBlockIteratorStub: ICalcBlockIteratorStub;
Begin
    MB := MetabaseClass.Active;
    
// Получим алгоритм расчёта
    MObj := MB.ItemById("ALGORITHM");
    Algo := CalcObjectFactory.CreateCalcObject(MObj, 
True);
    CalcAlgo := Algo 
As ICalcAlgorithm;
    
// Блок расчёта
    CalcBlock := CalcAlgo.Items(0) As ICalcBlock;
    CalcBlockIteratorModel := CalcBlock.EditIteratorModel;
    CalcBlockIteratorStub := CalcBlockIteratorModel.Stubs.Item(
0);
    
// Связь измерений источника и приёмника по идентификаторам атрибутов
    CalcBlockIteratorStub.LinkById;
    
// При наличии изменений в настройках сохраняем блок расчёта
    If CalcBlockIteratorModel.IsDirty Then
        CalcBlockIteratorModel.Save;
        CalcBlockIteratorModel.Dispose_;
        CalcBlock.SaveObject;
    
End If;
End Sub UserProc;

Не предусмотрен.

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

См. также:

ICalcBlockIteratorModel