Stamp: DateTime;
Свойство Stamp возвращает дату и время блокирования объект.
Для выполнения примера предполагается наличие в репозитории объекта с идентификатором "Obj_1".
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("Пользователь: " + UserInfo.UserName);
Debug.Write("; Станция: " + UserInfo.MachineName);
Debug.Write("; Дата и время блокировки: " + UserInfo.Stamp.ToString);
Debug.WriteLine("; Комментарий: " + UserInfo.Comment);
End For;
End Sub UserProc;
После выполнения примера в консоль среды разработки будет выведена информация о блокировках объекта "Obj_1".
См. также: