Чтение и запись.
Тип: Булево.
Возвращает или задает значение, показывающее, следует ли отменить событие.
ПриЗакрытииФормыАрг1 = Ф.ПриЗакрытииФормыАрг(); Сообщить("ПриЗакрытииФормыАрг1.Отмена = " + ПриЗакрытииФормыАрг1.Отмена);
Копировать Выделить всёПерем Ф, Счетчик; Процедура Форма1_ПриЗакрытии() Экспорт Счетчик = Счетчик + 1; ПриЗакрытииФормыАрг1 = Ф.ПриЗакрытииФормыАрг(); Сообщить("Попытка = " + Счетчик); Если Счетчик > 2 Тогда ПриЗакрытииФормыАрг1.Отмена = Ложь; Иначе ПриЗакрытииФормыАрг1.Отмена = Истина; КонецЕсли; КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Ширина = 450; Форма1.Текст = "Форма закроется с третьего раза"; Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); Форма1.ПриЗакрытии = Ф.Действие(ЭтотОбъект, "Форма1_ПриЗакрытии"); Счетчик = 0; Ф.ЗапуститьОбработкуСобытий();
Копировать Выделить всёПерем Ф, Счетчик; Процедура Форма1_ПриЗакрытии() Экспорт Счетчик = Счетчик + 1; ПриЗакрытииФормыАрг1 = Ф.ПриЗакрытииФормыАрг(); Сообщить("Попытка = " + Счетчик); Если Счетчик > 2 Тогда ПриЗакрытииФормыАрг1.Отмена = Ложь; Иначе ПриЗакрытииФормыАрг1.Отмена = Истина; КонецЕсли; КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Ширина = 450; Форма1.Текст = "Форма закроется с третьего раза"; Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); Форма1.ПриЗакрытии = Ф.Действие(ЭтотОбъект, "Форма1_ПриЗакрытии"); Счетчик = 0; Сообщить(?( Форма1.ПриЗакрытии.ИмяМетода = "Форма1_ПриЗакрытии" , "", "!!! ") + "ПриЗакрытииФормыАрг.Отмена (FormClosingEventArgs.Cancel) Свойство" + " " + ТекущаяДата());
ПриЗакрытииФормыАрг (FormClosingEventArgs) Класс | Библиотека OneScriptForms