procedure VarArrayUnlock(var V: Variant);

Процедура VarArrayUnlock разблокирует массив Variant, который ранее был заблокирован функцией VarArrayLock,
Массив может быть заблокирован более одного раза. Для разблокирования массива следует вызвать процедуру VarArrayUnlock столько же раз, сколько была вызвана VarArrayLock.
VarArrayUnlock- настоящая процедура.

Пример рассмотрен в функции VarArrayLock.