Диалог.ПриУходе (Dialog.Leave) Событие

Использование

Чтение и запись.

Значение

Тип: Действие (Action).

Возвращает или задает код для события, когда элемент теряет фокус.

Примечание

Аргументы события

Отправитель (Sender) Возвращает источник (объект) последнего события.
Параметр (Parameter) Возвращает объект, заданный при установке обработчика события, для передачи в обработчик события.

Пример

Диалог1.ПриУходе = ТФ.Действие(ЭтотОбъект, "Диалог1_ПриУходе");
Полный пример кода


Перем ТФ, Кнопка3, Диалог1, Таймер1, Кнопка1; Процедура ПриОткрытии() Экспорт Таймер1.Начать(); КонецПроцедуры Процедура Таймер1_ПриСрабатыванииТаймера() Экспорт Если Кнопка3.Сфокусирован Тогда Диалог1.УстановитьФокус(); ИначеЕсли Диалог1.Сфокусирован Тогда Кнопка3.УстановитьФокус(); КонецЕсли; КонецПроцедуры Процедура Диалог1_ПриУходе() Экспорт ТФ.Верхний.Текст = " |Диалог1_ПриУходе = " + ТекущаяДата(); ПриУходе = Истина; КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); Диалог1 = ТФ.Верхний.Добавить(ТФ.Диалог("Диалог1", 3, 3, 30, 5)); Кнопка1 = ТФ.Кнопка("Кнопка1"); Кнопка2 = ТФ.Кнопка("Кнопка2"); Диалог1.ДобавитьКнопку(Кнопка1); Диалог1.ДобавитьКнопку(Кнопка2); Диалог1.Икс = ТФ.Позиция.Абсолютно(1); Диалог1.Игрек = ТФ.Позиция.Абсолютно(3); Диалог1.ПриУходе = ТФ.Действие(ЭтотОбъект, "Диалог1_ПриУходе"); Кнопка3 = ТФ.Верхний.Добавить(ТФ.Кнопка("Кнопка3")); Кнопка3.Ниже(Диалог1, 1); Таймер1 = ТФ.Таймер(1000); Таймер1.ПриСрабатыванииТаймера = ТФ.Действие(ЭтотОбъект, "Таймер1_ПриСрабатыванииТаймера"); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.Запуск();

Тестовый код


Перем ТФ, Кнопка3, Диалог1, Таймер1, ПриУходе; Процедура ПриОткрытии() Экспорт Таймер1.Начать(); КонецПроцедуры Процедура Таймер1_ПриСрабатыванииТаймера() Экспорт Если Кнопка3.Сфокусирован Тогда Диалог1.УстановитьФокус(); ИначеЕсли Диалог1.Сфокусирован Тогда Кнопка3.УстановитьФокус(); КонецЕсли; КонецПроцедуры Процедура Диалог1_ПриУходе() Экспорт ТФ.Верхний.Текст = " |Диалог1_ПриУходе = " + ТекущаяДата(); ПриУходе = Истина; ТФ.ТаймерНачатьИОстановить(ЭтотОбъект, "ТаймерТик1"); КонецПроцедуры Процедура ТаймерТик1() Экспорт ТФ.Завершить(); КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); Диалог1 = ТФ.Верхний.Добавить(ТФ.Диалог("Диалог1", 3, 3, 30, 5)); Кнопка1 = ТФ.Кнопка("Кнопка1"); Кнопка2 = ТФ.Кнопка("Кнопка2"); Диалог1.ДобавитьКнопку(Кнопка1); Диалог1.ДобавитьКнопку(Кнопка2); Диалог1.Икс = ТФ.Позиция.Абсолютно(1); Диалог1.Игрек = ТФ.Позиция.Абсолютно(3); Диалог1.ПриУходе = ТФ.Действие(ЭтотОбъект, "Диалог1_ПриУходе"); Кнопка3 = ТФ.Верхний.Добавить(ТФ.Кнопка("Кнопка3")); Кнопка3.Ниже(Диалог1, 1); Таймер1 = ТФ.Таймер(1000); Таймер1.ПриСрабатыванииТаймера = ТФ.Действие(ЭтотОбъект, "Таймер1_ПриСрабатыванииТаймера"); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.Запуск(); Сообщить(?( ПриУходе , "", "!!! ") + "Диалог.ПриУходе (Dialog.Leave) Событие" + " " + ТекущаяДата() + Символы.ПС);

Смотрите также

Библиотека OneScriptTerminalGui