ПанельМеню.МышьНадЭлементом (MenuBar.MouseEnter) Событие

Использование

Чтение и запись.

Значение

Тип: Действие (Action).

Возвращает или задает код для события, когда указатель мыши находится над элементом.

Примечание

Аргументы события

Игрек (Y) Возвращает координату Y для события мыши.
Икс (X) Возвращает координату X для события мыши.
Отправитель (Sender) Возвращает источник (объект) последнего события.
Параметр (Parameter) Возвращает объект, заданный при установке обработчика события, для передачи в обработчик события.
ФлагиМыши (Flags) Возвращает флаги мыши для события мыши.
Элемент (View) Возвращает элемент.

Пример

_Меню.МышьНадЭлементом = ТФ.Действие(ЭтотОбъект, "_Меню_МышьНадЭлементом");
Полный пример кода


Перем ТФ, Окно1; Процедура ПриОткрытии() Экспорт Окно1.Текст = " |Периодически наводите мышь на панель меню. |"; КонецПроцедуры Процедура _Меню_МышьНадЭлементом() Экспорт АргументыСобытия = ТФ.АргументыСобытия; Окно1.Текст = "_Меню_МышьНадЭлементом = " + ТекущаяУниверсальнаяДатаВМиллисекундах() + " |Отправитель = " + АргументыСобытия.Отправитель + " |ФлагиМыши = " + АргументыСобытия.ФлагиМыши + " |Элемент = " + АргументыСобытия.Элемент + " |Икс = " + АргументыСобытия.Икс + " |Игрек = " + АргументыСобытия.Игрек + " |"; КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); Окно1 = ТФ.Окно("Результат действий"); Окно1.Игрек = ТФ.Позиция.Абсолютно(10); Окно1.Заполнить(); ТФ.Верхний.Добавить(Окно1); ТФ.Верхний.Текст = " | | | | | | | |Периодически наводите мышь на панель меню."; _Меню = ТФ.ПанельМеню(); ТФ.Верхний.Добавить(_Меню); _Файл = ТФ.ПунктМеню(); _Файл.Заголовок = "Файл"; _Меню.ПодМеню.Добавить(_Файл); _Открыть = ТФ.ЭлементМеню(); _Открыть.Заголовок = "Открыть"; _Файл.Элементы.Добавить(_Открыть); _Выход = ТФ.ЭлементМеню(); _Выход.Заголовок = "Выход"; _Файл.Элементы.Добавить(_Выход); _Поиск = ТФ.ПунктМеню(); _Поиск.Заголовок = "Поиск"; _Меню.ПодМеню.Добавить(_Поиск); _Найти = ТФ.ЭлементМеню(); _Найти.Заголовок = "Найти"; _Поиск.Элементы.Добавить(_Найти); _Справка = ТФ.ПунктМеню(); _Справка.Заголовок = "Справка"; _Меню.ПодМеню.Добавить(_Справка); _ОПрограмме = ТФ.ЭлементМеню(); _ОПрограмме.Заголовок = "ОПрограмме"; _Справка.Элементы.Добавить(_ОПрограмме); _Меню.МышьНадЭлементом = ТФ.Действие(ЭтотОбъект, "_Меню_МышьНадЭлементом"); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.Запуск();

Тестовый код


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

Смотрите также

Библиотека OneScriptTerminalGui