CreateMetabase: String;
The CreateMetabase property returns name of the repository,in which update was created.
Value of this property is stored in the CustomProperties collection and can be changed. It is relevant only on working with *.pefx files.
Executing the example requires the update file D:\Work\update.pefx.
Add a link to the Metabase system assembly.
Sub UserProc;
Var
Mb: IMetabase;
Update: IMetabaseUpdate;
Props: ICustomProperties;
Prop: ICustomProperty;
Begin
Mb := MetabaseClass.Active;
// Load update from file
Update := Mb.CreateUpdate;
Update.LoadFromFileNF("D:\Work\update.pefx");
// Information about update
Debug.WriteLine("---Information about update---");
Debug.WriteLine("CreateMetabase: " + Update.CreateMetabase);
Debug.WriteLine("CreatePlatformVersion: " + Update.CreatePlatformVersion);
Debug.WriteLine("CreateTimestamp: " + Update.CreateTimestamp.ToString);
Debug.WriteLine("CreateUserName: " + Update.CreateUserName);
Debug.WriteLine("CreateUserSID: " + Update.CreateUserSID);
Debug.WriteLine("CreateWorkstation: " + Update.CreateWorkstation);
Debug.WriteLine("---Information about update from CustomProperties---");
Props := Update.CustomProperties;
For Each Prop In Props Do
Debug.WriteLine(Prop.Id + ": " + Prop.Value);
End For;
End Sub UserProc;
After executing the example the update from file is loaded. Information about creating an update will be displayed in the development environment console. The information will be obtained from specialized properties and from the CustomProperties collection.
See also: