CreateUpdate: IMetabaseUpdate;
The CreateUpdate method creates an object of update.
Executing the example requires that the repository contains an assembly with the Assembly_1 identifier. This assembly contains any modules and forms.
Add a link to the Metabase system assembly.
Sub UserProc;
Var
Mb: IMetabase;
MUpdate: IMetabaseUpdate;
RootFolder: IMetabaseUpdateFolderNode;
Node: IMetabaseUpdateObjectNode;
Begin
Mb := MetabaseClass.Active;
MUpdate := Mb.CreateUpdate;
RootFolder := MUpdate.RootFolder;
Node := RootFolder.Add(MetabaseUpdateNodeType.Object) As IMetabaseUpdateObjectNode;
Node.UpdatePart := MetabaseObjectUpdatePart.DataMetadataSD;
Node.UpdateType := MetabaseObjectUpdateType.Simple;
Node.IncludeChildrenDependencies := TriState.OnOption;
Node.Object := Mb.ItemById("Assembly_1").Bind;
MUpdate.SaveToFileNF("C:\Update_1.pefx");
End Sub UserProc;
After executing of the example in the root of the C disc the new update file with the C:\Update_1.pefx name will be created. This file contains the Assembly_1 assembly with all its child objects.
See also: