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