Использование
Чтение и запись.
Значение
Тип: Действие (Action).
Возвращает или задает код для события, когда элемент получает фокус.
Примечание
Аргументы события
 Отправитель (Sender) |
Возвращает источник (объект) последнего события. |
| Параметр (Parameter) |
Возвращает объект, заданный при установке обработчика события, для передачи в обработчик события. |
Пример
Диалог1.ПриВходе = ТФ.Действие(ЭтотОбъект, "Диалог1_ПриВходе");
Полный пример кода
Перем ТФ, Кнопка3, Диалог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_ПриВходе = " + ТекущаяДата(); ПриВходе = Истина; ТФ.Завершить(); КонецПроцедуры ПодключитьВнешнююКомпоненту("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.Enter) Событие" + " " + ТекущаяДата() + Символы.ПС);