IObjectCheckOutInfo.Item

Syntax

Item(Index: Integer): IObjectCheckOutInfoUser;

Parameters

Index - index of record about repository object lock.

Description

The Item property returns information about repository object lock.

Example

Executing the example requires that the repository contains an object with the Obj_1 identifier.

Sub UserProc;

Var

MB: IMetabase;

MDesc: IMetabaseObjectDescriptor;

Info: IObjectCheckOutInfo;

i: Integer;

Begin

MB := MetabaseClass.Active;

MDesc := MB.ItemById("Obj_1");

Info := MDesc.GetCheckOutInfo;

For i := 0 To Info.Count - 1 Do

UserInfo := Info.Item(i);

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 the example the information about the locks of the Obj_1 object is displayed in the development environment console.

See also:

IObjectCheckOutInfo