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 = ТФ.Верхний.Добавить(ТФ.Дерево(, , 40, 7));
Дерево1.ЦветоваяСхема = ТФ.ЦветоваяСхема();
Дерево1.ЦветоваяСхема.Нормальный = ТФ.Атрибут(ТФ.Цвет.Синий, ТФ.Цвет.Серый);

Узел1 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел1"));
Узел2 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел2"));
Узел3 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел3"));
Узел1_1 = Узел1.Добавить(ТФ.УзелДерева("Узел1_1"));
Узел1_2 = Узел1.Добавить(ТФ.УзелДерева("Узел1_2"));
Узел1_1_1 = Узел1_1.Добавить(ТФ.УзелДерева("Узел1_1_1"));

Дерево1.РазвернутьВсе();

Дерево1.Икс = ТФ.Позиция.Абсолютно(1);
Дерево1.Игрек = ТФ.Позиция.Абсолютно(14);
Дерево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 = ТФ.Верхний.Добавить(ТФ.Дерево(, , 40, 7));
Дерево1.ЦветоваяСхема = ТФ.ЦветоваяСхема();
Дерево1.ЦветоваяСхема.Нормальный = ТФ.Атрибут(ТФ.Цвет.Синий, ТФ.Цвет.Серый);

Узел1 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел1"));
Узел2 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел2"));
Узел3 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел3"));
Узел1_1 = Узел1.Добавить(ТФ.УзелДерева("Узел1_1"));
Узел1_2 = Узел1.Добавить(ТФ.УзелДерева("Узел1_2"));
Узел1_1_1 = Узел1_1.Добавить(ТФ.УзелДерева("Узел1_1_1"));

Дерево1.РазвернутьВсе();

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

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

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

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

Библиотека OneScriptTerminalGui