КонтекстноеМеню.КнопкаМышиДляАктивации (ContextMenu.MouseFlags) Свойство

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

Только чтение.

Значение

Тип: ФлагиМыши (MouseFlags).

Возвращает значение, указывающее, какая кнопка мыши активирует контекстное меню.

Примечание

Пример

КнопкаМышиДляАктивации = КонтекстноеМеню1.КнопкаМышиДляАктивации;
Полный пример кода


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

Тестовый код


Перем ТФ, Окно1, КонтекстноеМеню1, КонтекстноеМеню, КнопкаМышиДляАктивации; Процедура ПриОткрытии() Экспорт КонтекстноеМеню = КонтекстноеМеню1; Окно1.Текст = "Кликните правой кнопкой мыши в окне. |или нажмите s"; КонецПроцедуры Процедура Окно1_ПриНажатииМыши() Экспорт АргументыСобытия = ТФ.АргументыСобытия; Если АргументыСобытия.ФлагиМыши = КонтекстноеМеню1.КнопкаМышиДляАктивации Тогда КонтекстноеМеню1.Позиция = ТФ.Точка(АргументыСобытия.Икс, АргументыСобытия.Игрек); КонтекстноеМеню1.Показать(); КонецЕсли; ТФ.ТаймерНачатьИОстановить(ЭтотОбъект, "ТаймерТик"); КонецПроцедуры Процедура ТаймерТик() Экспорт КнопкаМышиДляАктивации = КонтекстноеМеню1.КнопкаМышиДляАктивации; ТФ.ТаймерНачатьИОстановить(ЭтотОбъект, "ТаймерТик1"); КонецПроцедуры Процедура ТаймерТик1() Экспорт ТФ.Завершить(); КонецПроцедуры Процедура СочетаниеКлавишДействие() Экспорт КонтекстноеМеню1.Позиция = ТФ.Точка(5, 5); КонтекстноеМеню1.Показать(); ТФ.ТаймерНачатьИОстановить(ЭтотОбъект, "ТаймерТик"); КонецПроцедуры ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptTerminalGui\OneScriptTerminalGui\bin\Debug\OneScriptTerminalGui.dll"); ТФ = Новый ТерминалФормыДляОдноСкрипта(); Окно1 = ТФ.Верхний.Добавить(ТФ.Окно("Окно1")); Окно1.Заполнить(ТФ.Ширина / 2, ТФ.Высота / 2); Окно1.ПриНажатииМыши = ТФ.Действие(ЭтотОбъект, "Окно1_ПриНажатииМыши"); Окно1.ЦветоваяСхема = ТФ.ЦветоваяСхема(); Окно1.ЦветоваяСхема.Нормальный = ТФ.Атрибут(ТФ.Цвет.ЯркоГолубой, ТФ.Цвет.Синий); Окно1.ЦветоваяСхема.Фокус = ТФ.Атрибут(ТФ.Цвет.ЯркоГолубой, ТФ.Цвет.Синий); КонтекстноеМеню1 = ТФ.КонтекстноеМеню(); ПунктМеню1 = ТФ.ПунктМеню(); ЭлементМеню1 = ПунктМеню1.Элементы.Добавить(ТФ.ЭлементМеню("_Открыть")); ЭлементМеню2 = ПунктМеню1.Элементы.Добавить(ТФ.ЭлементМеню("_Выход")); КонтекстноеМеню1.ПодМеню = ПунктМеню1; КонтекстноеМеню1.ДобавитьСочетаниеКлавиш(ТФ.Клавиши.s_low); КонтекстноеМеню1.СочетаниеКлавишДействие = ТФ.Действие(ЭтотОбъект, "СочетаниеКлавишДействие", КонтекстноеМеню1); ТФ.ПриОткрытии = ТФ.Действие(ЭтотОбъект, "ПриОткрытии"); ТФ.Запуск(); Сообщить(?( КнопкаМышиДляАктивации = 16384 , "", "!!! ") + "КонтекстноеМеню.КнопкаМышиДляАктивации (ContextMenu.MouseFlags) Свойство" + " " + ТекущаяДата() + Символы.ПС);

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

Библиотека OneScriptTerminalGui