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