Кнопка.КлавишаНажата (Button.KeyPress) Событие

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

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

Значение

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

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

Примечание

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

Клавиша (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_КлавишаНажата = " + ТекущаяУниверсальнаяДатаВМиллисекундах() + " |Отправитель = " + АргументыСобытия.Отправитель + " |Клавиша = " + АргументыСобытия.Клавиша + " (" + ТФ.Клавиши.Имя(АргументыСобытия.Клавиша) + ") |КлавишаСтрокой = " + АргументыСобытия.КлавишаСтрокой + " |ЭтоAlt = " + АргументыСобытия.ЭтоAlt + " |ЭтоCapslock = " + АргументыСобытия.ЭтоCapslock + " |ЭтоCtrl = " + АргументыСобытия.ЭтоCtrl + " |ЭтоNumlock = " + АргументыСобытия.ЭтоNumlock + " |ЭтоScrolllock = " + АргументыСобытия.ЭтоScrolllock + " |ЭтоShift = " + АргументыСобытия.ЭтоShift + " |"; КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); Кнопка1 = ТФ.Кнопка(); Кнопка1.Текст = "Кнопка1"; Кнопка1.Икс = ТФ.Позиция.Абсолютно(1); Кнопка1.Игрек = ТФ.Позиция.Абсолютно(14); Кнопка1.Ширина = ТФ.Величина.Абсолютно(25); Кнопка1.Высота = ТФ.Величина.Абсолютно(3); Граница1 = ТФ.Граница(); Граница1.СтильГраницы = ТФ.СтильГраницы.Закругленная; Кнопка1.Граница = Граница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 = ТФ.Кнопка(); Кнопка1.Текст = "Кнопка1"; Кнопка1.Икс = ТФ.Позиция.Абсолютно(1); Кнопка1.Игрек = ТФ.Позиция.Абсолютно(14); Кнопка1.Ширина = ТФ.Величина.Абсолютно(25); Кнопка1.Высота = ТФ.Величина.Абсолютно(3); Граница1 = ТФ.Граница(); Граница1.СтильГраницы = ТФ.СтильГраницы.Закругленная; Кнопка1.Граница = Граница1; ТФ.Верхний.Добавить(Кнопка1); Кнопка1.КлавишаНажата = ТФ.Действие(ЭтотОбъект, "Кнопка1_КлавишаНажата"); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.ЗапуститьИЗавершить(); Сообщить(?( КлавишаНажата , "", "!!! ") + "Кнопка.КлавишаНажата (Button.KeyPress) Событие" + " " + ТекущаяДата() + Символы.ПС);

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

Библиотека OneScriptTerminalGui