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