Add: IMetabaseUpdateProperty;
The Add method adds a flag to the collection.
Executing the example requires that the root of the C disc contains the Update.pefx update file.
Sub UserProc;
Var
MB: IMetabase;
Update: IMetabaseUpdate;
Properties: IMetabaseUpdateProperties;
Prop: IMetabaseUpdateProperty;
Begin
MB := MetabaseClass.Active;
Update := MB.CreateUpdate;
Update.LoadFromFileNF("c:\Update.pefx");
Properties := Update.Properties;
Prop := Properties.Add;
Prop.Name := "Flag";
Prop.Id := "FLAG";
Prop.DataType := DbDataType.Integer;
Prop.Value := 1;
Update.SaveToFileNF("C:\Update.pefx");
End Sub UserProc;
After executing the example a flag of integer type with the "1" value by default is added to the update, loaded from the file C:\Update.pefx. Then the update is saved.
See also: