Чтение и запись.
Тип: СочетаниеКлавиш (Shortcut).
Возвращает или задает значение, указывающее комбинацию клавиш связанных с пунктом меню.
Одно из значений перечисления СочетаниеКлавиш (Shortcut). Значение по умолчанию: Отсутствие (None).
Клавиши быстрого вызова обеспечивают способ для пользователей активировать часто используемое меню элементов в вашей системе меню и предоставить доступ к клавиатуре для вашего приложения для тех пользователей, у которых нет доступа к мыши или другому манипулятору.
ЭлементМеню1.СочетаниеКлавиш = Ф.СочетаниеКлавиш.ShiftF10;
Копировать Выделить всёФункция Новый_Нажатие() Экспорт Сообщить("Новый_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах()); КонецФункции ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); ГлавноеМеню1 = Ф.ГлавноеМеню(); _Файл = ГлавноеМеню1.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Файл")); _Справка = ГлавноеМеню1.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Справка")); ЭлементМеню1 = Ф.ЭлементМеню("Новый", Ф.Действие(ЭтотОбъект, "Новый_Нажатие")); ЭлементМеню1.СочетаниеКлавиш = Ф.СочетаниеКлавиш.ShiftF10; Подменю_Файл_Новый = _Файл.ЭлементыМеню.Добавить(ЭлементМеню1); Подменю_Файл_Открыть = _Файл.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Открыть")); Подменю_Файл_Сохранить = _Файл.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Сохранить")); Подменю_Файл_СохранитьКак = _Файл.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Сохранить как...")); Подменю_Файл_Выход = _Файл.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Выход")); Подменю_Файл_СохранитьКак_txt = Подменю_Файл_СохранитьКак.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Файл *.txt")); Подменю_Файл_СохранитьКак_rtf = Подменю_Файл_СохранитьКак.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Файл *.rtf")); Подменю_Справка_Помошник = _Справка.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Помошник")); Подменю_Справка_Опрограмме = _Справка.ЭлементыМеню.Добавить(Ф.ЭлементМеню("О программе...")); Форма1.Меню = ГлавноеМеню1; Ф.ЗапуститьОбработкуСобытий();
Копировать Выделить всёФункция Новый_Нажатие() Экспорт Сообщить("Новый_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах()); КонецФункции ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll"); Ф = Новый ФормыДляОдноСкрипта(); Форма1 = Ф.Форма(); Форма1.Отображать = Истина; Форма1.Показать(); Форма1.Активизировать(); ГлавноеМеню1 = Ф.ГлавноеМеню(); _Файл = ГлавноеМеню1.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Файл")); _Справка = ГлавноеМеню1.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Справка")); ЭлементМеню1 = Ф.ЭлементМеню("Новый", Ф.Действие(ЭтотОбъект, "Новый_Нажатие")); ЭлементМеню1.СочетаниеКлавиш = Ф.СочетаниеКлавиш.ShiftF10; Подменю_Файл_Новый = _Файл.ЭлементыМеню.Добавить(ЭлементМеню1); Подменю_Файл_Открыть = _Файл.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Открыть")); Подменю_Файл_Сохранить = _Файл.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Сохранить")); Подменю_Файл_СохранитьКак = _Файл.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Сохранить как...")); Подменю_Файл_Выход = _Файл.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Выход")); Подменю_Файл_СохранитьКак_txt = Подменю_Файл_СохранитьКак.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Файл *.txt")); Подменю_Файл_СохранитьКак_rtf = Подменю_Файл_СохранитьКак.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Файл *.rtf")); Подменю_Справка_Помошник = _Справка.ЭлементыМеню.Добавить(Ф.ЭлементМеню("Помошник")); Подменю_Справка_Опрограмме = _Справка.ЭлементыМеню.Добавить(Ф.ЭлементМеню("О программе...")); Форма1.Меню = ГлавноеМеню1; Сообщить(?( Подменю_Файл_Новый.СочетаниеКлавиш = Ф.СочетаниеКлавиш.ShiftF10 , "", "!!! ") + "ЭлементМеню.СочетаниеКлавиш (MenuItem.Shortcut) Свойство" + " " + ТекущаяДата());