Чтение и запись.
Тип: Действие (Action).
Возвращает или задает код обработчика события для сочетания клавиш, установленного для элемента.
Отправитель (Sender) |
Возвращает источник (объект) последнего события. |
Параметр (Parameter) |
Возвращает объект, заданный при установке обработчика события, для передачи в обработчик события. |
Кнопка1.СочетаниеКлавишДействие = ТФ.Действие(ЭтотОбъект, "СочетаниеКлавишДействие");
Перем ТФ; Процедура ПриОткрытии() Экспорт Если ТФ.ПлатформаWin Тогда ТФ.ОтправитьКлавиши("s", Ложь, Ложь, Ложь); КонецЕсли; КонецПроцедуры Процедура СочетаниеКлавишДействие() Экспорт Объект1 = ТФ.АргументыСобытия.Параметр; Список = Объект1.ПолучитьСочетаниеКлавиш(); Стр = ""; Для Каждого Эл Из Список Цикл Стр = Стр + " | " + Эл.Значение + " (" + Эл.Представление + ") " + ТекущаяУниверсальнаяДатаВМиллисекундах(); КонецЦикла; ТФ.Верхний.Текст = " | | | | | | |Нажмите s в английской раскладке |СочетаниеКлавиш для " + Объект1.Текст + " = " + Стр; КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); Кнопка1 = ТФ.Кнопка(); Кнопка1.Текст = "Кнопка1"; Кнопка1.Икс = ТФ.Позиция.Абсолютно(1); Кнопка1.Игрек = ТФ.Позиция.Абсолютно(1); Кнопка1.Ширина = ТФ.Величина.Абсолютно(25); Кнопка1.Высота = ТФ.Величина.Абсолютно(3); Граница1 = ТФ.Граница(); Граница1.СтильГраницы = ТФ.СтильГраницы.Закругленная; Кнопка1.Граница = Граница1; ТФ.Верхний.Добавить(Кнопка1); Кнопка1.ДобавитьСочетаниеКлавиш(ТФ.Клавиши.s_low); Кнопка1.ДобавитьСочетаниеКлавиш(ТФ.Клавиши.x_low); Кнопка1.СочетаниеКлавишДействие = ТФ.Действие(ЭтотОбъект, "СочетаниеКлавишДействие", Кнопка1); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.Запуск();
Перем ТФ, Стр; Процедура ПриОткрытии() Экспорт Если ТФ.ПлатформаWin Тогда ТФ.ОтправитьКлавиши("s", Ложь, Ложь, Ложь); КонецЕсли; КонецПроцедуры Процедура СочетаниеКлавишДействие() Экспорт Объект1 = ТФ.АргументыСобытия.Параметр; Список = Объект1.ПолучитьСочетаниеКлавиш(); Стр = ""; Для Каждого Эл Из Список Цикл Стр = Стр + " | " + Эл.Значение + " (" + Эл.Представление + ")"; КонецЦикла; ТФ.Верхний.Текст = " | | | | | | |Нажмите s в английской раскладке |СочетаниеКлавиш для " + Объект1.Текст + " = " + Стр; ТФ.ТаймерНачатьИОстановить(ЭтотОбъект, "ТаймерТик"); КонецПроцедуры Процедура ТаймерТик() Экспорт ТФ.Завершить(); КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); Кнопка1 = ТФ.Кнопка(); Кнопка1.Текст = "Кнопка1"; Кнопка1.Икс = ТФ.Позиция.Абсолютно(1); Кнопка1.Игрек = ТФ.Позиция.Абсолютно(1); Кнопка1.Ширина = ТФ.Величина.Абсолютно(25); Кнопка1.Высота = ТФ.Величина.Абсолютно(3); Граница1 = ТФ.Граница(); Граница1.СтильГраницы = ТФ.СтильГраницы.Закругленная; Кнопка1.Граница = Граница1; ТФ.Верхний.Добавить(Кнопка1); Кнопка1.ДобавитьСочетаниеКлавиш(ТФ.Клавиши.s_low); Кнопка1.ДобавитьСочетаниеКлавиш(ТФ.Клавиши.x_low); Кнопка1.СочетаниеКлавишДействие = ТФ.Действие(ЭтотОбъект, "СочетаниеКлавишДействие", Кнопка1); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.Запуск(); Сообщить(?( Стр = " | 115 (s_low) | 120 (x_low)" , "", "!!! ") + "Кнопка.СочетаниеКлавишДействие (Button.ShortcutAction) Событие" + " " + ТекущаяДата() + Символы.ПС);