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