RWidjets v.1.3.1

УстановитьПерехват, SetHookEsc


Включает, выключает перехват нажатия кнопки Esc

Синтаксис

 УстановитьПерехватЭскейп(пРежим);

Параметры

пРежим

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

Возвращает

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

Примечание

Включение перехвата не позволяет пользователю прервать выполнение модуля нажатием кнопки Esc. Во всех других режимах кнопка работает по-прежнему.

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

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