ДиалогСохранения.СочетаниеКлавишДействие (SaveDialog.ShortcutAction) Событие

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

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

Значение

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

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

Примечание

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

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

Пример

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



Перем ТФ, Таймер1, ДиалогСохранения1;

Процедура ПриОткрытии() Экспорт
	ТФ.Верхний.Текст = "Сочетание клавиш для ДиалогСохранения1 - s. Нажмите.";
	Таймер1.Начать();
	ДиалогСохранения1.КнопкаОтмена().УстановитьФокус();
КонецПроцедуры

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

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

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

ДиалогСохранения1 = ТФ.Верхний.Добавить(ТФ.ДиалогСохранения("Диалог сохранения", "Сообщение", 3, 5));
ТипыФайлов = Новый Массив();
ТипыФайлов.Добавить(".txt");
ТипыФайлов.Добавить(".bin");
ТипыФайлов.Добавить(".xml");
ТипыФайлов.Добавить(".json");
ДиалогСохранения1.ДопустимыеФайлы = ТипыФайлов;
ДиалогСохранения1.ДобавитьСочетаниеКлавиш(ТФ.Клавиши.s_low);
ДиалогСохранения1.ДобавитьСочетаниеКлавиш(ТФ.Клавиши.d_low);
ДиалогСохранения1.СочетаниеКлавишДействие = ТФ.Действие(ЭтотОбъект, "СочетаниеКлавишДействие", ДиалогСохранения1);
ДиалогСохранения1.ПоказатьДиалог();

Таймер1 = ТФ.Таймер(2000);
Таймер1.ПриСрабатыванииТаймера = ТФ.Действие(ЭтотОбъект, "Таймер1_ПриСрабатыванииТаймера");

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

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

Тестовый код 



Перем ТФ, Таймер1, ДиалогСохранения1, СочетаниеКлавишДействие;

Процедура ПриОткрытии() Экспорт
	ТФ.Верхний.Текст = "Сочетание клавиш для ДиалогСохранения1 - s. Нажмите.";
	ДиалогСохранения1.КнопкаОтмена().УстановитьФокус();
КонецПроцедуры

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

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

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

ДиалогСохранения1 = ТФ.Верхний.Добавить(ТФ.ДиалогСохранения("Диалог сохранения", "Сообщение", 3, 5));
ТипыФайлов = Новый Массив();
ТипыФайлов.Добавить(".txt");
ТипыФайлов.Добавить(".bin");
ТипыФайлов.Добавить(".xml");
ТипыФайлов.Добавить(".json");
ДиалогСохранения1.ДопустимыеФайлы = ТипыФайлов;
ДиалогСохранения1.ДобавитьСочетаниеКлавиш(ТФ.Клавиши.s_low);
ДиалогСохранения1.ДобавитьСочетаниеКлавиш(ТФ.Клавиши.d_low);
ДиалогСохранения1.СочетаниеКлавишДействие = ТФ.Действие(ЭтотОбъект, "СочетаниеКлавишДействие", ДиалогСохранения1);
ДиалогСохранения1.ПоказатьДиалог();

Таймер1 = ТФ.Таймер(2000);
Таймер1.ПриСрабатыванииТаймера = ТФ.Действие(ЭтотОбъект, "Таймер1_ПриСрабатыванииТаймера");

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

Сообщить(?(
СочетаниеКлавишДействие
, "", "!!! ") + "ДиалогСохранения.СочетаниеКлавишДействие (SaveDialog.ShortcutAction) Событие" + " " + ТекущаяДата() + Символы.ПС);

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

Библиотека OneScriptTerminalGui