KeyPress Event

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

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

Значение

Возвращает или задает код, выполняемый при нажатии клавиши в то время как элемент имеет фокус.

Примечание

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

Клавиша (KeyValue)	Возвращает значение для клавиши в виде целого числа.
КлавишаСтрокой (KeyToString)	Возвращает значение для клавиши в виде строки вместе со значением модификатора, если таковой был применен.
Отправитель (Sender)	Возвращает источник (объект) последнего события.
Параметр (Parameter)	Возвращает объект, заданный при установке обработчика события, для передачи в обработчик события.
ЭтоAlt (IsAlt)	Возвращает значение, указывающее, была ли нажата клавиша Alt (реальная или синтезированная).
ЭтоCapslock (IsCapslock)	Возвращает значение, указывающее, была ли нажата клавиша CapsLock (реальная или синтезированная).
ЭтоCtrl (IsCtrl)	Возвращает значение, указывающее, была ли нажата клавиша Ctrl (реальная или синтезированная).
ЭтоNumlock (IsNumlock)	Возвращает значение, указывающее, была ли нажата клавиша NumLock (реальная или синтезированная).
ЭтоScrolllock (IsScrolllock)	Возвращает значение, указывающее, была ли нажата клавиша ScrollLock (реальная или синтезированная).
ЭтоShift (IsShift)	Возвращает значение, указывающее, была ли нажата клавиша Shift (реальная или синтезированная).

Пример

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

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



Перем ТФ, ПолеВыбора1, КлавишаНажата;

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

Процедура ПолеВыбора1_КлавишаНажата() Экспорт
	АргументыСобытия = ТФ.АргументыСобытия;
	ТФ.Верхний.Текст = "ПолеВыбора1 сейчас в фокусе. Нажмите любую клавишу. С модификаторами или без.
	|ПолеВыбора1_КлавишаНажата = " + ТекущаяУниверсальнаяДатаВМиллисекундах() + "
	|Отправитель = " + АргументыСобытия.Отправитель + "
	|Клавиша = " + АргументыСобытия.Клавиша + " (" + ТФ.Клавиши.Имя(АргументыСобытия.Клавиша) + ")
	|КлавишаСтрокой = " + АргументыСобытия.КлавишаСтрокой + "
	|ЭтоAlt = " + АргументыСобытия.ЭтоAlt + "
	|ЭтоCapslock = " + АргументыСобытия.ЭтоCapslock + "
	|ЭтоCtrl = " + АргументыСобытия.ЭтоCtrl + "
	|ЭтоNumlock = " + АргументыСобытия.ЭтоNumlock + "
	|ЭтоScrolllock = " + АргументыСобытия.ЭтоScrolllock + "
	|ЭтоShift = " + АргументыСобытия.ЭтоShift + "
	|";

	КлавишаНажата = Истина;
КонецПроцедуры

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

ПолеВыбора1 = ТФ.Верхний.Добавить(ТФ.ПолеВыбора(0, 0));
ПолеВыбора1.ЦветоваяСхема = ТФ.Цвета.Основа;

СписокЗначений1 = ПолеВыбора1.Источник;
СписокЗначений1.Добавить("Дядя Фёдор - мальчик, у которого прозвище ""Дядя"".", "Дядя Фёдор");
СписокЗначений1.Добавить("Матроскин - кот, хозяйственный, имеет коров и собственное хозяйство.", "Матроскин");
СписокЗначений1.Добавить("Шарик - пёс, добрый, весёлый, простой, любит современные вещи.", "Шарик");
СписокЗначений1.Добавить("Галчонок. Очень хитрый, любит воровать еду пока никто не видит.", "Галчонок");
СписокЗначений1.Добавить("Игорь Иванович Печкин - почтальон, работающий в простоквашинском почтовом отделении.", "почтальон Печкин");
СписокЗначений1.Добавить("Вера Павловна - сестра Дяди Фёдора.", "Вера Павловна");
СписокЗначений1.Добавить("Тама-Тама - грызун неизвестной породы, изобретатель, художник.", "Тама-Тама");
СписокЗначений1.Добавить("Маргарита Егоровна (Мегеровна) - няня, нанятая родителями.", "Маргарита Егоровна");
СписокЗначений1.Добавить("Мама - мать Дяди Фёдора и Веры Павловны. Добрая, любящая. Хорошая хозяйка.", "Мама");
СписокЗначений1.Добавить("Папа - отец Дяди Фёдора и Веры Павловны. Добродушный, справедливый, с отличным чувством юмора.", "Папа");
СписокЗначений1.Добавить(3.14, "Число Пи");
СписокЗначений1.Добавить(ТФ, "ТерминалФормыДляОдноСкрипта");

ПолеВыбора1.ИндексВыбранного = 1;
ПолеВыбора1.Развернуть();

ПолеВыбора1.Икс = ТФ.Позиция.Абсолютно(1);
ПолеВыбора1.Игрек = ТФ.Позиция.Абсолютно(14);
ПолеВыбора1.КлавишаНажата = ТФ.Действие(ЭтотОбъект, "ПолеВыбора1_КлавишаНажата");

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

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

Тестовый код



Перем ТФ, ПолеВыбора1, КлавишаНажата;

Процедура ПриОткрытии() Экспорт
	ТФ.Верхний.Текст = "ПолеВыбора1 сейчас в фокусе. Нажмите любую клавишу. С модификаторами или без.";
	ПолеВыбора1.УстановитьФокус();
	Если ТФ.ПлатформаWin Тогда
		ТФ.ТаймерНачатьИОстановить(ЭтотОбъект, "ТаймерТик");
	КонецЕсли;
КонецПроцедуры

Процедура ПолеВыбора1_КлавишаНажата() Экспорт
	АргументыСобытия = ТФ.АргументыСобытия;
	ТФ.Верхний.Текст = "ПолеВыбора1 сейчас в фокусе. Нажмите любую клавишу. С модификаторами или без.
	|ПолеВыбора1_КлавишаНажата = " + ТекущаяУниверсальнаяДатаВМиллисекундах() + "
	|Отправитель = " + АргументыСобытия.Отправитель + "
	|Клавиша = " + АргументыСобытия.Клавиша + " (" + ТФ.Клавиши.Имя(АргументыСобытия.Клавиша) + ")
	|КлавишаСтрокой = " + АргументыСобытия.КлавишаСтрокой + "
	|ЭтоAlt = " + АргументыСобытия.ЭтоAlt + "
	|ЭтоCapslock = " + АргументыСобытия.ЭтоCapslock + "
	|ЭтоCtrl = " + АргументыСобытия.ЭтоCtrl + "
	|ЭтоNumlock = " + АргументыСобытия.ЭтоNumlock + "
	|ЭтоScrolllock = " + АргументыСобытия.ЭтоScrolllock + "
	|ЭтоShift = " + АргументыСобытия.ЭтоShift + "
	|";

	КлавишаНажата = Истина;
	ТФ.ТаймерНачатьИОстановить(ЭтотОбъект, "ТаймерТик1");
КонецПроцедуры

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

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

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

ПолеВыбора1 = ТФ.Верхний.Добавить(ТФ.ПолеВыбора(0, 0));
ПолеВыбора1.ЦветоваяСхема = ТФ.Цвета.Основа;

СписокЗначений1 = ПолеВыбора1.Источник;
СписокЗначений1.Добавить("Дядя Фёдор - мальчик, у которого прозвище ""Дядя"".", "Дядя Фёдор");
СписокЗначений1.Добавить("Матроскин - кот, хозяйственный, имеет коров и собственное хозяйство.", "Матроскин");
СписокЗначений1.Добавить("Шарик - пёс, добрый, весёлый, простой, любит современные вещи.", "Шарик");
СписокЗначений1.Добавить("Галчонок. Очень хитрый, любит воровать еду пока никто не видит.", "Галчонок");
СписокЗначений1.Добавить("Игорь Иванович Печкин - почтальон, работающий в простоквашинском почтовом отделении.", "почтальон Печкин");
СписокЗначений1.Добавить("Вера Павловна - сестра Дяди Фёдора.", "Вера Павловна");
СписокЗначений1.Добавить("Тама-Тама - грызун неизвестной породы, изобретатель, художник.", "Тама-Тама");
СписокЗначений1.Добавить("Маргарита Егоровна (Мегеровна) - няня, нанятая родителями.", "Маргарита Егоровна");
СписокЗначений1.Добавить("Мама - мать Дяди Фёдора и Веры Павловны. Добрая, любящая. Хорошая хозяйка.", "Мама");
СписокЗначений1.Добавить("Папа - отец Дяди Фёдора и Веры Павловны. Добродушный, справедливый, с отличным чувством юмора.", "Папа");
СписокЗначений1.Добавить(3.14, "Число Пи");
СписокЗначений1.Добавить(ТФ, "ТерминалФормыДляОдноСкрипта");

ПолеВыбора1.ИндексВыбранного = 1;
ПолеВыбора1.Развернуть();

ПолеВыбора1.Икс = ТФ.Позиция.Абсолютно(1);
ПолеВыбора1.Игрек = ТФ.Позиция.Абсолютно(14);
ПолеВыбора1.КлавишаНажата = ТФ.Действие(ЭтотОбъект, "ПолеВыбора1_КлавишаНажата");

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

Сообщить(?(
КлавишаНажата
, "", "!!! ") + "ПолеВыбора.КлавишаНажата (ComboBox.KeyPress) Событие" + " " + ТекущаяДата() + Символы.ПС);

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

Библиотека OneScriptTerminalGui