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