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