RWidjets v.1.3.1

Установить, Set


Включает, выключает режим выполнения скрипта при уничтожении экземпляра объекта.

Синтаксис

 Установить(пРежим, пСкрипт);

Параметры

пРежим

(необязательный) Тип: Число. 1 - включить выполнение скрипта, 0 - выключить

пСкрипт

(необязательный) Тип: Строка. Текст скрипта, выполняющегося в момент уничтожения экземпляра объекта.
Значение по-умолчанию: Пустая строка

Возвращает

Режим до выполнения метода.

Примечание

В момент уничтожения экземпляра объекта (при выходе из зоны видимости локальной переменной, прерывании работы модуля) выполняется указанный скрипт. Скрипт пишется на внутреннем языке 1С. Скрипт выполняется в локальном контексте. Или в глобальном контексте, если работа локального модуля завершается. Другими словами, при уничтожении переменной модуля.

Процедура Сформировать()
лХук=СоздатьОбъект("RHook");
лХук.Установить(1, "Предупреждение(""Работа модуля прервана в цикле 1."");");
// цикл 1
Для А=1 По 10000 Цикл
Состояние("Цикл 1");
КонецЦикла;
лХук.Скрипт("глПриУничтоженииПеременной()");
// цикл 2
Для А=1 По 10000 Цикл
Состояние("Цикл 2");
КонецЦикла;
лХук.Установить(0);
КонецПроцедуры
// процедура глобального контекста
Процедура глПриУничтоженииПеременной()
Предупреждение("Работа модуля прервана в цикле 2.");
КонецПроцедуры

©1998-2006 Robert :: robert2.by.ru