Только чтение.
Тип: КлавишиКонсоли (ConsoleKey); Число.
Возвращает клавишу вызова, определенную для элемента. Событие Нажатие (Clicked) сработает, если элемент имеет фокус.
Важно: Клавиша вызова определяется размещением знака подчеркивания "_" перед назначаемым символом.
Возвращенная методом клавиша - это назначенная клавиша приведенная к верхнему регистру. Но событие Кнопка.Нажатие (Button.Clicked) сработает от назначенной клавиши приведенной к нижнему регистру.
Другими словами, если текст кнопки = "Кно_Пка", событие нажатия на кнопку сработает от нижнерегистровой "п". Мотод же вернет верхнерегистровую "П".
КлавишаВызова = Правка.КлавишаВызова;
Перем ТФ, Текст, ПанельМеню1, КлавишаВызова; Процедура ПриОткрытии() Экспорт // ПанельМеню1.Открыть(); // ТФ.ОтправитьКлавиши("п", Ложь, Ложь, Ложь); КонецПроцедуры Процедура Меню_Нажатие() Экспорт Объект = ТФ.АргументыСобытия.Параметр; КлавишаВызова = Объект.КлавишаВызова; ТФ.Верхний.Текст = Текст + Объект.Заголовок + " " + ТекущаяУниверсальнаяДатаВМиллисекундах() + " |" + Объект.Заголовок + ".КлавишаВызова = " + КлавишаВызова; КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); ПанельМеню1 = ТФ.ПанельМеню(); ТФ.Верхний.Добавить(ПанельМеню1); Файл = ТФ.ПунктМеню(); Файл.Заголовок = "_Файл"; Файл.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", Файл); ПанельМеню1.ПодМеню.Добавить(Файл); Открыть = ТФ.ЭлементМеню(); Открыть.Заголовок = "_Открыть"; Открыть.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", Открыть); Файл.Элементы.Добавить(Открыть); Выход = ТФ.ЭлементМеню(); Выход.Заголовок = "В_ыход"; Выход.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", Выход); Файл.Элементы.Добавить(Выход); //================================================ Правка = ТФ.ПунктМеню(); Правка.Заголовок = "П_равка"; Правка.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", Правка); ПанельМеню1.ПодМеню.Добавить(Правка); Отмена = ТФ.ЭлементМеню(); Отмена.Заголовок = "Отмена"; Отмена.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", Отмена); Правка.Элементы.Добавить(Отмена); Повтор = ТФ.ЭлементМеню(); Повтор.Заголовок = "Повтор"; Повтор.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", Повтор); Правка.Элементы.Добавить(Повтор); //================================================ Поиск = ТФ.ПунктМеню(); Поиск.Заголовок = "По_иск"; Поиск.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", Поиск); ПанельМеню1.ПодМеню.Добавить(Поиск); ИскатьДалее = ТФ.ЭлементМеню(); ИскатьДалее.Заголовок = "ИскатьДалее"; ИскатьДалее.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", ИскатьДалее); Поиск.Элементы.Добавить(ИскатьДалее); ИскатьРанее = ТФ.ЭлементМеню(); ИскатьРанее.Заголовок = "ИскатьРанее"; ИскатьРанее.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", ИскатьРанее); Поиск.Элементы.Добавить(ИскатьРанее); //================================================ Текст = " | | | | | | |Откройте панель меню по Alt или F9 и используйте клавиши вызова пунктов меню. |"; ТФ.Верхний.Текст = Текст; ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.Запуск();
Перем ТФ, Текст, ПанельМеню1, КлавишаВызова; Процедура ПриОткрытии() Экспорт ПанельМеню1.Открыть(); ТФ.ОтправитьКлавиши("р", Ложь, Ложь, Ложь); КонецПроцедуры Процедура Меню_Нажатие() Экспорт Объект = ТФ.АргументыСобытия.Параметр; КлавишаВызова = Объект.КлавишаВызова; ТФ.Верхний.Текст = Текст + Объект.Заголовок + " " + ТекущаяУниверсальнаяДатаВМиллисекундах() + " |" + Объект.Заголовок + ".КлавишаВызова = " + КлавишаВызова; КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); ПанельМеню1 = ТФ.ПанельМеню(); ТФ.Верхний.Добавить(ПанельМеню1); Файл = ТФ.ПунктМеню(); Файл.Заголовок = "_Файл"; Файл.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", Файл); ПанельМеню1.ПодМеню.Добавить(Файл); Открыть = ТФ.ЭлементМеню(); Открыть.Заголовок = "_Открыть"; Открыть.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", Открыть); Файл.Элементы.Добавить(Открыть); Выход = ТФ.ЭлементМеню(); Выход.Заголовок = "В_ыход"; Выход.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", Выход); Файл.Элементы.Добавить(Выход); //================================================ Правка = ТФ.ПунктМеню(); Правка.Заголовок = "П_равка"; Правка.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", Правка); ПанельМеню1.ПодМеню.Добавить(Правка); Отмена = ТФ.ЭлементМеню(); Отмена.Заголовок = "Отмена"; Отмена.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", Отмена); Правка.Элементы.Добавить(Отмена); Повтор = ТФ.ЭлементМеню(); Повтор.Заголовок = "Повтор"; Повтор.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", Повтор); Правка.Элементы.Добавить(Повтор); //================================================ Поиск = ТФ.ПунктМеню(); Поиск.Заголовок = "По_иск"; Поиск.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", Поиск); ПанельМеню1.ПодМеню.Добавить(Поиск); ИскатьДалее = ТФ.ЭлементМеню(); ИскатьДалее.Заголовок = "ИскатьДалее"; ИскатьДалее.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", ИскатьДалее); Поиск.Элементы.Добавить(ИскатьДалее); ИскатьРанее = ТФ.ЭлементМеню(); ИскатьРанее.Заголовок = "ИскатьРанее"; ИскатьРанее.Нажатие = ТФ.Действие(ЭтотОбъект, "Меню_Нажатие", ИскатьРанее); Поиск.Элементы.Добавить(ИскатьРанее); //================================================ Текст = " | | | | | | |Откройте панель меню по Alt или F9 и используйте клавиши вызова пунктов меню. |"; ТФ.Верхний.Текст = Текст; ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.ЗапуститьИЗавершить(); Сообщить(?( КлавишаВызова = "Р" , "", "!!! ") + "ПунктМеню.КлавишаВызова (MenuBarItem.HotKey) Свойство" + " " + ТекущаяДата() + Символы.ПС);