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