Condition: IExpression;
Свойство Condition возвращает условие, при выполнении которого будет осуществляться обновление объекта.
Для выполнения примера предполагается наличие объекта репозитория с идентификатором "Form_1".
Sub Main;
Var
MB: IMetabase;
MU: IMetabaseUpdate;
Prop: IMetabaseUpdateProperty;
UFN: IMetabaseUpdateFolderNode;
Object: IMetabaseUpdateObjectNode;
Begin
MB := MetabaseClass.Active;
MU := MB.CreateUpdate;
//добавляем флаг
Prop := MU.Properties.Add;
Prop.DataType := DbDataType.Integer;
Prop.Id := "Flag1";
Prop.Name := "Flag1";
Prop.Value := 1;
//добавляем объект
UFN := MU.RootFolder;
Object := UFN.Add(MetabaseUpdateNodeType.Object) As IMetabaseUpdateObjectNode;
Object.Object := MB.ItemById("Form_1");
Object.Label := MB.ItemById("Form_1").Name;
Object.Condition.AsString := "Flag1 = 2";
//сохраняем обновление
MU.SaveToFileNF("C:\Pef1.pefx");
End Sub Main;
После выполнения примера будет создано новое обновление. В обновлении будет создан флаг, используемый для задания условий обновления, и в список объектов будет добавлен объект репозитория с идентификатором "Form_1". Для данного объекта будет задано условие, после чего обновление сохраняется в файл "C:\Pef1.pefx".
См. также: