Чтение и запись.
Тип: Действие (Action).
Возвращает или задает код для события, когда элемент теряет фокус.
Отправитель (Sender) |
Возвращает источник (объект) последнего события. |
Параметр (Parameter) |
Возвращает объект, заданный при установке обработчика события, для передачи в обработчик события. |
Дерево1.ПриУходе = ТФ.Действие(ЭтотОбъект, "Дерево1_ПриУходе");
Перем ТФ, Дерево1, Кнопка; Процедура ПриОткрытии() Экспорт ТФ.Верхний.Текст = "Дерево1 сейчас в фокусе. Нажмите любую клавишу. С модификаторами или без."; Кнопка.УстановитьФокус(); КонецПроцедуры Процедура Дерево1_ПриУходе() Экспорт ТФ.Верхний.Текст = " |Дерево1_ПриУходе = " + ТекущаяУниверсальнаяДатаВМиллисекундах(); ПриУходе = Истина КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); Дерево1 = ТФ.Верхний.Добавить(ТФ.Дерево(, , 40, 7)); Дерево1.ЦветоваяСхема = ТФ.ЦветоваяСхема(); Дерево1.ЦветоваяСхема.Нормальный = ТФ.Атрибут(ТФ.Цвет.Синий, ТФ.Цвет.Серый); Узел1 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел1")); Узел2 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел2")); Узел3 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел3")); Узел1_1 = Узел1.Добавить(ТФ.УзелДерева("Узел1_1")); Узел1_2 = Узел1.Добавить(ТФ.УзелДерева("Узел1_2")); Узел1_1_1 = Узел1_1.Добавить(ТФ.УзелДерева("Узел1_1_1")); Дерево1.РазвернутьВсе(); Дерево1.Икс = ТФ.Позиция.Абсолютно(1); Дерево1.Игрек = ТФ.Позиция.Абсолютно(14); Дерево1.ПриУходе = ТФ.Действие(ЭтотОбъект, "Дерево1_ПриУходе"); Кнопка = ТФ.Верхний.Добавить(ТФ.Кнопка("Кнопка", 2, 2)); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.Запуск();
Перем ТФ, Дерево1, Кнопка, ПриУходе; Процедура ПриОткрытии() Экспорт ТФ.Верхний.Текст = "Дерево1 сейчас в фокусе. Нажмите любую клавишу. С модификаторами или без."; Кнопка.УстановитьФокус(); КонецПроцедуры Процедура Дерево1_ПриУходе() Экспорт ТФ.Верхний.Текст = " |Дерево1_ПриУходе_ПриУходе = " + ТекущаяУниверсальнаяДатаВМиллисекундах(); ПриУходе = Истина; КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); Дерево1 = ТФ.Верхний.Добавить(ТФ.Дерево(, , 40, 7)); Дерево1.ЦветоваяСхема = ТФ.ЦветоваяСхема(); Дерево1.ЦветоваяСхема.Нормальный = ТФ.Атрибут(ТФ.Цвет.Синий, ТФ.Цвет.Серый); Узел1 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел1")); Узел2 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел2")); Узел3 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел3")); Узел1_1 = Узел1.Добавить(ТФ.УзелДерева("Узел1_1")); Узел1_2 = Узел1.Добавить(ТФ.УзелДерева("Узел1_2")); Узел1_1_1 = Узел1_1.Добавить(ТФ.УзелДерева("Узел1_1_1")); Дерево1.РазвернутьВсе(); Дерево1.Икс = ТФ.Позиция.Абсолютно(1); Дерево1.Игрек = ТФ.Позиция.Абсолютно(14); Дерево1.ПриУходе = ТФ.Действие(ЭтотОбъект, "Дерево1_ПриУходе"); Кнопка = ТФ.Верхний.Добавить(ТФ.Кнопка("Кнопка", 2, 3)); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.ЗапуститьИЗавершить(); Сообщить(?( ПриУходе , "", "!!! ") + "Дерево.ПриУходе (TreeView.Leave) Событие" + " " + ТекущаяДата() + Символы.ПС);