CreateDbLock(ResourceName : String; Id : Integer = 0) : DbLock
Заблокировать ресурс

Функция CreateDbLock пытается заблокировать ресурс ResourceName. Если ресурс уже заблокирован, то происходит исключение. Функция CreateDbLock возвращает объект класса DbLock. Блокировка уничтожается, как только возвращенный объект будет разрушен (т.е. на объект не будет указывать ни одна переменная).

Ресурс в данном случае, это просто строка. Программист может выбрать любое сочетание символов.

Функция работает только если в свойствах программы включена опция "Включить блокировку документов". После включения этой опции обязательно сравните программу с базой данных и примените изменения на сервере. Платформа создаст необходимые для работы блокировки объекты базы данных.

Если опция "Включить блокировку документов" не включена, то функция CreateDbLock выполняется без исключений.

Пример:

Procedure OnCreate;
Var
  L1 : DbLock;
Begin
  L1 := CreateDbLock('ExternalDb');
  // Здесь внешняя база данных заблокирована
End;

Смотри: DbLock.Table, DbLock.Field, DbLock.Id, CreateDbLock - записи.

© RTIT