UserName: String;
The UserName property returns a name of the user, who blocked the object.
Executing the example requires that the repository contains an object with the Obj_1 identifier.
Sub UserProc;
Var
MB: IMetabase;
MDesc: IMetabaseObjectDescriptor;
Info: IObjectCheckOutInfo;
UserInfo: IObjectCheckOutInfoUser;
Begin
MB := MetabaseClass.Active;
MDesc := MB.ItemById("Obj_1");
Info := MDesc.GetCheckOutInfo;
For Each UserInfo In Info Do
Debug.Write("User: " + UserInfo.UserName);
Debug.Write("; Machine: " + UserInfo.MachineName);
Debug.Write("; Date and time of lock: " + UserInfo.Stamp.ToString);
Debug.WriteLine("; Comment: " + UserInfo.Comment);
End For;
End Sub UserProc;
After executing this example the information about the lockings of the Obj_1 object is displayed in the development environment console.
See also: