ShortcutAction Event

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

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

Значение

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

Примечание

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

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

Пример

Таблица1.СочетаниеКлавишДействие = ТФ.Действие(ЭтотОбъект, "СочетаниеКлавишДействие", Таблица1);

Полный пример кода



Перем ТФ;

Процедура ПриОткрытии() Экспорт
	ТФ.Верхний.Текст = "Нажмите s в английской раскладке";
	Если ТФ.ПлатформаWin Тогда
		ТФ.ОтправитьКлавиши("s", Ложь, Ложь, Ложь);
	КонецЕсли;
КонецПроцедуры

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

ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll");
ТФ = Новый ТерминалФормыДляОдноСкрипта();

Таблица1 = ТФ.Верхний.Добавить(ТФ.Таблица(, 5));
ТаблицаДанных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;

Таблица1.ДобавитьСочетаниеКлавиш(ТФ.Клавиши.s_low);
Таблица1.СочетаниеКлавишДействие = ТФ.Действие(ЭтотОбъект, "СочетаниеКлавишДействие", Таблица1);

ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии");

ТФ.Запуск();

Тестовый код



Перем ТФ, Список;

Процедура ПриОткрытии() Экспорт
	ТФ.Верхний.Текст = "Нажмите s в английской раскладке";
	Если ТФ.ПлатформаWin Тогда
		ТФ.ОтправитьКлавиши("s", Ложь, Ложь, Ложь);
	КонецЕсли;
КонецПроцедуры

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

Процедура ТаймерТик() Экспорт
	ТФ.Завершить();
КонецПроцедуры

ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll");
ТФ = Новый ТерминалФормыДляОдноСкрипта();

Таблица1 = ТФ.Верхний.Добавить(ТФ.Таблица(, 5));
ТаблицаДанных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;

Таблица1.ДобавитьСочетаниеКлавиш(ТФ.Клавиши.s_low);
Таблица1.СочетаниеКлавишДействие = ТФ.Действие(ЭтотОбъект, "СочетаниеКлавишДействие", Таблица1);

ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии");
ТФ.Запуск();

Сообщить(?(
Список.Количество() = 1
, "", "!!! ") + "Таблица.СочетаниеКлавишДействие (TableView.ShortcutAction) Событие" + " " + ТекущаяДата() + Символы.ПС);

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

Библиотека OneScriptTerminalGui