Чтение и запись.
Тип: Булево.
Возвращает или задает значение, указывающее, следует ли отменить событие.
Процедура ПриИзмененииТекста() Экспорт АргументыСобытия = ТФ.АргументыСобытия; НовыйТекст = АргументыСобытия.НовыйТекст; ОтменаДо = АргументыСобытия.Отмена; АргументыСобытия.Отмена = Истина; ТФ.Верхний.Текст = Текст + " |НовыйТекст = " + АргументыСобытия.НовыйТекст + " |Отмена до события = " + ОтменаДо + " |Отмена при событии = " + АргументыСобытия.Отмена + " |"; КонецПроцедуры
Перем ТФ, ПолеВвода1, Текст; Процедура ПриОткрытии() Экспорт Текст = "Печатайте текст. Отмена включена."; ТФ.Верхний.Текст = Текст; КонецПроцедуры Процедура ПриИзмененииТекста() Экспорт АргументыСобытия = ТФ.АргументыСобытия; НовыйТекст = АргументыСобытия.НовыйТекст; ОтменаДо = АргументыСобытия.Отмена; АргументыСобытия.Отмена = Истина; ТФ.Верхний.Текст = Текст + " |НовыйТекст = " + АргументыСобытия.НовыйТекст + " |Отмена до события = " + ОтменаДо + " |Отмена при событии = " + АргументыСобытия.Отмена + " |"; КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); ПолеВвода1 = ТФ.Верхний.Добавить(ТФ.ПолеВвода("", 1, 8, 50)); ПолеВвода1.ПриИзмененииТекста = ТФ.Действие(ЭтотОбъект, "ПриИзмененииТекста"); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.Запуск();
Перем ТФ, ПолеВвода1, Текст, Отмена; Процедура ПриОткрытии() Экспорт Текст = "Печатайте текст. Отмена включена."; ТФ.Верхний.Текст = Текст; КонецПроцедуры Процедура ПриИзмененииТекста() Экспорт АргументыСобытия = ТФ.АргументыСобытия; НовыйТекст = АргументыСобытия.НовыйТекст; ОтменаДо = АргументыСобытия.Отмена; АргументыСобытия.Отмена = Истина; ТФ.Верхний.Текст = Текст + " |НовыйТекст = " + АргументыСобытия.НовыйТекст + " |Отмена до события = " + ОтменаДо + " |Отмена при событии = " + АргументыСобытия.Отмена + " |"; Отмена = АргументыСобытия.Отмена; ТФ.Завершить(); КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); ПолеВвода1 = ТФ.Верхний.Добавить(ТФ.ПолеВвода("", 1, 8, 50)); ПолеВвода1.ПриИзмененииТекста = ТФ.Действие(ЭтотОбъект, "ПриИзмененииТекста"); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.Запуск(); Сообщить(?( Отмена , "", "!!! ") + "АргументыСобытия.Отмена (EventArgs.Cancel) Свойство" + " " + ТекущаяДата() + Символы.ПС);