LoadFromFileNF(FileName: String; [Mode: UpdateLoadMode = 0]);
LoadFromFileNF(FileName: System.String; Prognoz.Platform.Interop.Metabase.UpdateLoadMode);
FileName. Полное имя файла обновления;
Mode. Метод загрузки объектов в обновление. Необязательный параметр.
Метод LoadFromFileNF загружает обновление из файла с расширением *.pefx.
Формат *.pefx позволяет сохранять в обновление большее количество объектов по сравнению с форматом *.pef. Для загрузки обновления из старого формата *.pef используйте метод IMetabaseUpdate.LoadFromFile.
Для выполнения примера добавьте ссылку на системную сборку Metabase. Предполагается наличие файла обновления «C:\Update_1.pefx».
Sub UserProc;
Var
MB: IMetabase;
Update: IMetabaseUpdate;
SpecialObjNode: IMetabaseUpdateSpecialObjectsNode;
Begin
MB := MetabaseClass.Active;
Update := Mb.CreateUpdate;
Update.LoadFromFileNF("C:\Update_1.pefx");
SpecialObjNode := Update.SpecialObjectsNode;
SpecialObjNode.ApplyObject(MetabaseSpecialObject.SharedParams) := True;
Update.SaveToFileNF("C:\Update_2.pefx");
End Sub UserProc;
После выполнения примера в обновление, загруженное из файла «C:\Update_1.pefx», будет добавлен специальный объект: глобальные переменные. Затем обновление будет сохранено в другой файл.
Предполагается наличие файла обновления «C:\Update_1.pefx». Указанная процедура является точкой входа для .NET-сборки.
Public Shared Sub Main(Params: StartParams);
Var
MB: IMetabase;
Update: IMetabaseUpdate;
SpecialObjNode: IMetabaseUpdateSpecialObjectsNode;
Begin
MB := Params.Metabase;
Update := Mb.CreateUpdate();
Update.LoadFromFileNF("C:\"+ "Update_1.pefx", UpdateLoadMode.ulmReplace);
SpecialObjNode := Update.SpecialObjectsNode;
SpecialObjNode.ApplyObject[MetabaseSpecialObject.msoSharedParams] := True;
Update.SaveToFileNF("C:\" + "Update_2.pefx");
End Sub;
После выполнения примера в обновление, загруженное из файла «C:\Update_1.pefx», будет добавлен специальный объект: глобальные переменные. Затем обновление будет сохранено в другой файл.
См. также: