IMetabaseUpdateProperties.Add

Синтаксис

Add: IMetabaseUpdateProperty;

Описание

Метод Add осуществляет добавление флага в коллекцию.

Пример

Для выполнения примера предполагается наличие файла обновления «C:\Update.pefx».

Sub Main;

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 := "Флаг";

Prop.Id := "FLAG";

Prop.DataType := DbDataType.Integer;

Prop.Value := 1;

Update.SaveToFileNF("C:\Update.pefx");

End Sub Main;

После выполнения примера в обновление, загруженное из файла «C:\Update.pefx», будет добавлен флаг целого типа со значением по умолчанию «1». Затем обновление будет сохранено.

См. также:

IMetabaseUpdateProperties