Comment: String;
The Comment property returns a comment to a record of object changing.
Executing the example requires that the repository contains an object with the ObjTest identifier.
Add a link to the Metabase system assembly.
Sub UserProc;
Var
MB: IMetabase;
Desc: IMetabaseObjectDescriptor;
Histor: IMetabaseObjectHistory;
Item: IMetabaseObjectHistoryItem;
i: Integer;
Begin
MB := MetabaseClass.Active;
Desc := Mb.ItemById("ObjTest");
Histor := Desc.GetHistory;
For i := 0 To Histor.Count - 1 Do
Item := Histor.Item(i);
Debug.WriteLine(Item.Comment + " " + DateTime.FromDouble(Item.Stamp).ToString);
End For;
End Sub UserProc;
After executing the example information about the ObjTest object changing is displayed in the development environment console. The comment, data and time of objects changing are displayed.
See also: