Использование
Чтение и запись.
Значение
Тип: Действие (Action).
Возвращает или задает код, выполняемый при нажатии клавиши в то время как элемент имеет фокус.
Примечание
Аргументы события
 Клавиша (KeyValue) |
Возвращает значение для клавиши в виде целого числа. |
| КлавишаСтрокой (KeyToString) |
Возвращает значение для клавиши в виде строки вместе со значением модификатора, если таковой был применен. |
| Отправитель (Sender) |
Возвращает источник (объект) последнего события. |
| Параметр (Parameter) |
Возвращает объект, заданный при установке обработчика события, для передачи в обработчик события. |
| ЭтоAlt (IsAlt) |
Возвращает значение, указывающее, была ли нажата клавиша Alt (реальная или синтезированная). |
| ЭтоCapslock (IsCapslock) |
Возвращает значение, указывающее, была ли нажата клавиша CapsLock (реальная или синтезированная). |
| ЭтоCtrl (IsCtrl) |
Возвращает значение, указывающее, была ли нажата клавиша Ctrl (реальная или синтезированная). |
| ЭтоNumlock (IsNumlock) |
Возвращает значение, указывающее, была ли нажата клавиша NumLock (реальная или синтезированная). |
| ЭтоScrolllock (IsScrolllock) |
Возвращает значение, указывающее, была ли нажата клавиша ScrollLock (реальная или синтезированная). |
| ЭтоShift (IsShift) |
Возвращает значение, указывающее, была ли нажата клавиша Shift (реальная или синтезированная). |
Пример
ТФ.Верхний.КлавишаНажата = ТФ.Действие(ЭтотОбъект, "КлавишаНажата");
Полный пример кода
Перем ТФ; Процедура ПриОткрытии() Экспорт ТФ.ОтправитьКлавиши("к", Ложь, Ложь, Ложь); КонецПроцедуры Процедура КлавишаНажата() Экспорт АргументыСобытия = ТФ.АргументыСобытия; ТФ.Верхний.Текст = "Нажмите любую клавишу. С модификаторами или без. |ТФ.Верхний.КлавишаНажата = " + ТекущаяУниверсальнаяДатаВМиллисекундах() + " |Отправитель = " + АргументыСобытия.Отправитель + " |Клавиша = " + АргументыСобытия.Клавиша + " (" + ТФ.Клавиши.Имя(АргументыСобытия.Клавиша) + ") |КлавишаСтрокой = " + АргументыСобытия.КлавишаСтрокой + " |ЭтоAlt = " + АргументыСобытия.ЭтоAlt + " |ЭтоCapslock = " + АргументыСобытия.ЭтоCapslock + " |ЭтоCtrl = " + АргументыСобытия.ЭтоCtrl + " |ЭтоNumlock = " + АргументыСобытия.ЭтоNumlock + " |ЭтоScrolllock = " + АргументыСобытия.ЭтоScrolllock + " |ЭтоShift = " + АргументыСобытия.ЭтоShift + " |"; КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); ТФ.Верхний.КлавишаНажата = ТФ.Действие(ЭтотОбъект, "КлавишаНажата"); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.Запуск();
Тестовый код
Перем ТФ, КлавишаСтрокой; Процедура ПриОткрытии() Экспорт ТФ.ОтправитьКлавиши("к", Ложь, Ложь, Ложь); КонецПроцедуры Процедура КлавишаНажата() Экспорт АргументыСобытия = ТФ.АргументыСобытия; ТФ.Верхний.Текст = "Нажмите любую клавишу. С модификаторами или без. |ТФ.Верхний.КлавишаНажата = " + ТекущаяУниверсальнаяДатаВМиллисекундах() + " |Отправитель = " + АргументыСобытия.Отправитель + " |Клавиша = " + АргументыСобытия.Клавиша + " (" + ТФ.Клавиши.Имя(АргументыСобытия.Клавиша) + ") |КлавишаСтрокой = " + АргументыСобытия.КлавишаСтрокой + " |ЭтоAlt = " + АргументыСобытия.ЭтоAlt + " |ЭтоCapslock = " + АргументыСобытия.ЭтоCapslock + " |ЭтоCtrl = " + АргументыСобытия.ЭтоCtrl + " |ЭтоNumlock = " + АргументыСобытия.ЭтоNumlock + " |ЭтоScrolllock = " + АргументыСобытия.ЭтоScrolllock + " |ЭтоShift = " + АргументыСобытия.ЭтоShift + " |"; КлавишаСтрокой = АргументыСобытия.КлавишаСтрокой; КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); ТФ.Верхний.КлавишаНажата = ТФ.Действие(ЭтотОбъект, "КлавишаНажата"); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.ЗапуститьИЗавершить(); Сообщить(?( КлавишаСтрокой = "1082" , "", "!!! ") + "Верхний.КлавишаНажата (Toplevel.KeyPress) Событие" + " " + ТекущаяДата() + Символы.ПС);