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