Чтение и запись.
Тип: Действие (Action).
Возвращает или задает код для события возникающего до изменения текста. Событие может быть отменено или текст будет изменен.
НовыйТекст (NewText) |
Возвращает текст элемента после изменения. |
Отмена (Cancel) |
Возвращает или задает значение, указывающее, следует ли отменить событие. |
Отправитель (Sender) |
Возвращает источник (объект) последнего события. |
Параметр (Parameter) |
Возвращает объект, заданный при установке обработчика события, для передачи в обработчик события. |
ПолеВвода1.ПриИзмененииТекста = ТФ.Действие(ЭтотОбъект, "ПриИзмененииТекста");
Перем ТФ, ПолеВвода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.ПриИзмененииТекста = ТФ.Действие(ЭтотОбъект, "ПриИзмененииТекста"); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.Запуск(); Сообщить(?( Отмена , "", "!!! ") + "ПолеВвода.ТекстИзменен (TextField.TextChanged) Событие" + " " + ТекущаяДата() + Символы.ПС);