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