ПанельВкладок.СочетаниеКлавишДействие (TabView.ShortcutAction) Событие

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

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

Значение

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

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

Примечание

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

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

Пример

ПанельВкладок1.СочетаниеКлавишДействие = ТФ.Действие(ЭтотОбъект, "СочетаниеКлавишДействие", ПанельВкладок1);
Полный пример кода


Перем ТФ; Процедура ПриОткрытии() Экспорт ТФ.Верхний.Текст = "Нажмите s в английской раскладке"; Если ТФ.ПлатформаWin Тогда ТФ.ОтправитьКлавиши("s", Ложь, Ложь, Ложь); КонецЕсли; КонецПроцедуры Процедура СочетаниеКлавишДействие() Экспорт Объект = ТФ.АргументыСобытия.Параметр; Список = Объект.ПолучитьСочетаниеКлавиш(); Стр = ""; Для Каждого Эл Из Список Цикл Стр = Стр + " | " + Эл.Значение + " (" + Эл.Представление + ") " + ТекущаяУниверсальнаяДатаВМиллисекундах(); КонецЦикла; ТФ.Уведомление().Показать("СочетаниеКлавиш для " + Объект + " = " + Стр, -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.ДобавитьСочетаниеКлавиш(ТФ.Клавиши.s_low); ПанельВкладок1.СочетаниеКлавишДействие = ТФ.Действие(ЭтотОбъект, "СочетаниеКлавишДействие", ПанельВкладок1); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.Запуск();

Тестовый код


Перем ТФ, Список; Процедура ПриОткрытии() Экспорт ТФ.Верхний.Текст = "Нажмите s в английской раскладке"; Если ТФ.ПлатформаWin Тогда ТФ.ОтправитьКлавиши("s", Ложь, Ложь, Ложь); КонецЕсли; КонецПроцедуры Процедура СочетаниеКлавишДействие() Экспорт Объект = ТФ.АргументыСобытия.Параметр; Список = Объект.ПолучитьСочетаниеКлавиш(); Стр = ""; Для Каждого Эл Из Список Цикл Стр = Стр + " | " + Эл.Значение + " (" + Эл.Представление + ") " + ТекущаяУниверсальнаяДатаВМиллисекундах(); КонецЦикла; ТФ.Уведомление().Показать("СочетаниеКлавиш для " + Объект + " = " + Стр, -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.ДобавитьСочетаниеКлавиш(ТФ.Клавиши.s_low); ПанельВкладок1.СочетаниеКлавишДействие = ТФ.Действие(ЭтотОбъект, "СочетаниеКлавишДействие", ПанельВкладок1); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.Запуск(); Сообщить(?( Список.Количество() = 1 , "", "!!! ") + "ПанельВкладок.СочетаниеКлавишДействие (TabView.ShortcutAction) Событие" + " " + ТекущаяДата() + Символы.ПС);

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

Библиотека OneScriptTerminalGui