Объекты DIRECTUM

 

Объект IApplication

 

Метод CreateLock – создать блокировку

Синтаксис:

Параметры:

ObjectType – тип объекта;

ObjectID – ИД объекта.

Возвращаемое значение:

Возвращает объект-блокировку.

Описание:

Метод создает и возвращает объект-блокировку. В качестве параметра ObjectType следует передавать одно из значений TCompType.

Пример использования:

 

// Заблокировать задачу.

// TaskID – ИД блокируемой задачи.

Lock = Application.CreateLock(ctTask; TaskID)

Lock.TryLockObject

if Lock.Locked and not Lock.LockedByThis

  Exit(Format('Задача с ИД = %s заблокирована поль ователем %s';

   ArrayOf(TaskID; Lock.UserName)))

endif