КлавишаАрг.Модификаторы (KeyEventArgs.Modifiers) Свойство

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

Только чтение.

Значение

Тип: Клавиши (Keys).

Возвращает флаги модификаторов для события КлавишаВниз (KeyDown) или КлавишаВверх (KeyUp). Это указывает, какая комбинация клавиш-модификаторов (CTRL, SHIFT и ALT) была нажата.

Примечание

Значения модификаторов смотрите в перечислении Клавиши (Keys) Класс.

Пример

Сообщить("КлавишаАрг1.Модификаторы = " + КлавишаАрг1.Модификаторы);
Полный пример кода

Копировать     Выделить всё

Перем Ф; Процедура Форма1_КлавишаВверх_КлавишаВниз() Экспорт КлавишаАрг1 = Ф.КлавишаАрг(); Сообщить("КлавишаАрг1.Alt = " + КлавишаАрг1.Alt); Сообщить("КлавишаАрг1.Ctrl = " + КлавишаАрг1.Ctrl); Сообщить("КлавишаАрг1.Shift = " + КлавишаАрг1.Shift); Сообщить("КлавишаАрг1.КодКлавиши = " + КлавишаАрг1.КодКлавиши); Сообщить("КлавишаАрг1.Модификаторы = " + КлавишаАрг1.Модификаторы); Сообщить("==========================================="); КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Ширина = 600; Форма1.Высота = 400; Форма1.Текст = "Нажмите Alt или Ctrl или Shift"; Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); Форма1.КлавишаВниз = Ф.Действие(ЭтотОбъект, "Форма1_КлавишаВверх_КлавишаВниз"); Форма1.КлавишаВверх = Ф.Действие(ЭтотОбъект, "Форма1_КлавишаВверх_КлавишаВниз"); Ф.ЗапуститьОбработкуСобытий();

Тестовый код

Копировать     Выделить всё

Перем Ф, КлавишаАрг1; Процедура Форма1_КлавишаВверх_КлавишаВниз() Экспорт КлавишаАрг1 = Ф.КлавишаАрг(); КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); Ф.РазрешитьСобытия = Истина; Форма1.КлавишаВниз = Ф.Действие(ЭтотОбъект, "Форма1_КлавишаВверх_КлавишаВниз"); Форма1.КлавишаВверх = Ф.Действие(ЭтотОбъект, "Форма1_КлавишаВверх_КлавишаВниз"); Если Ф.ПлатформаWin Тогда Ф.ОтправитьКлавиши("{%}"); Приостановить(1000); Форма1.Активизировать(); Сообщить(?("" + КлавишаАрг1 = "КлКлавишаАрг", "", "!!! ") + "КлавишаАрг.Модификаторы (KeyEventArgs.Modifiers) Свойство" + " " + ТекущаяДата()); Иначе Сообщить(?( Истина , "", "!!! ") + "КлавишаАрг.Модификаторы (KeyEventArgs.Modifiers) Свойство" + " " + ТекущаяДата()); КонецЕсли;

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

КлавишаАрг (KeyEventArgs) Класс | Библиотека OneScriptForms