ДобавитьСочетаниеКлавиш(<СочетаниеКлавиш>)
Добавляет сочетание клавиш для элемента. Сочетание клавиш можно использовать в качестве глобального ярлыка для вызова действия, если действие указано.
Дерево1.ДобавитьСочетаниеКлавиш(ТФ.Клавиши.s_low); Дерево1.СочетаниеКлавишДействие = ТФ.Действие(ЭтотОбъект, "СочетаниеКлавишДействие", Дерево1);
Перем ТФ; Процедура ПриОткрытии() Экспорт ТФ.Верхний.Текст = "Нажмите s в английской раскладке"; Если ТФ.ПлатформаWin Тогда ТФ.ОтправитьКлавиши("s", Ложь, Ложь, Ложь); КонецЕсли; КонецПроцедуры Процедура СочетаниеКлавишДействие() Экспорт Объект = ТФ.АргументыСобытия.Параметр; Список = Объект.ПолучитьСочетаниеКлавиш(); Стр = ""; Для Каждого Эл Из Список Цикл Стр = Стр + " | " + Эл.Значение + " (" + Эл.Представление + ") " + ТекущаяУниверсальнаяДатаВМиллисекундах(); КонецЦикла; ТФ.Уведомление().Показать("СочетаниеКлавиш для " + Объект + " = " + Стр, -1); КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); Дерево1 = ТФ.Верхний.Добавить(ТФ.Дерево(, 5, 40, 7)); Дерево1.ЦветоваяСхема = ТФ.ЦветоваяСхема(); Дерево1.ЦветоваяСхема.Нормальный = ТФ.Атрибут(ТФ.Цвет.Синий, ТФ.Цвет.Серый); Узел1 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел1")); Узел2 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел2")); Узел3 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел3")); Узел1_1 = Узел1.Добавить(ТФ.УзелДерева("Узел1_1")); Узел1_2 = Узел1.Добавить(ТФ.УзелДерева("Узел1_2")); Узел1_1_1 = Узел1_1.Добавить(ТФ.УзелДерева("Узел1_1_1")); Дерево1.РазвернутьВсе(); Дерево1.ДобавитьСочетаниеКлавиш(ТФ.Клавиши.s_low); Дерево1.СочетаниеКлавишДействие = ТФ.Действие(ЭтотОбъект, "СочетаниеКлавишДействие", Дерево1); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.Запуск();
Перем ТФ, Список; Процедура ПриОткрытии() Экспорт ТФ.Верхний.Текст = "Нажмите s в английской раскладке"; Если ТФ.ПлатформаWin Тогда ТФ.ОтправитьКлавиши("s", Ложь, Ложь, Ложь); КонецЕсли; КонецПроцедуры Процедура СочетаниеКлавишДействие() Экспорт Объект = ТФ.АргументыСобытия.Параметр; Список = Объект.ПолучитьСочетаниеКлавиш(); Стр = ""; Для Каждого Эл Из Список Цикл Стр = Стр + " | " + Эл.Значение + " (" + Эл.Представление + ") " + ТекущаяУниверсальнаяДатаВМиллисекундах(); КонецЦикла; ТФ.Уведомление().Показать("СочетаниеКлавиш для " + Объект + " = " + Стр, -1); ТФ.ТаймерНачатьИОстановить(ЭтотОбъект, "ТаймерТик"); КонецПроцедуры Процедура ТаймерТик() Экспорт ТФ.Завершить(); КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); Дерево1 = ТФ.Верхний.Добавить(ТФ.Дерево(, 5, 40, 7)); Дерево1.ЦветоваяСхема = ТФ.ЦветоваяСхема(); Дерево1.ЦветоваяСхема.Нормальный = ТФ.Атрибут(ТФ.Цвет.Синий, ТФ.Цвет.Серый); Узел1 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел1")); Узел2 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел2")); Узел3 = Дерево1.ДобавитьУзел(ТФ.УзелДерева("Узел3")); Узел1_1 = Узел1.Добавить(ТФ.УзелДерева("Узел1_1")); Узел1_2 = Узел1.Добавить(ТФ.УзелДерева("Узел1_2")); Узел1_1_1 = Узел1_1.Добавить(ТФ.УзелДерева("Узел1_1_1")); Дерево1.РазвернутьВсе(); Дерево1.ДобавитьСочетаниеКлавиш(ТФ.Клавиши.s_low); Дерево1.СочетаниеКлавишДействие = ТФ.Действие(ЭтотОбъект, "СочетаниеКлавишДействие", Дерево1); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.Запуск(); Сообщить(?( Список.Количество() = 1 , "", "!!! ") + "Дерево.ДобавитьСочетаниеКлавиш (TreeView.AddShortcut) Метод" + " " + ТекущаяДата() + Символы.ПС);