Menu.GetMainMenu Method

Синтаксис

ПолучитьГлавноеМеню()

Параметры

Возвращаемое значение

Описание

Возвращает ГлавноеМеню (MainMenu), содержащее это меню.

Примечание

Это свойство возвращает значение Неопределено, если меню не содержится в объекте ГлавноеМеню (MainMenu). Это может произойти, если меню содержится в объекте ЭлементМеню (MenuItem), или в объекте КонтекстноеМеню (ContextMenu), или если меню не содержится ни в одном меню. С помощью этого свойства можно определить, используется ли в данный момент меню, а также определить, где.

Пример

ГлМеню = Подменю_Файл_СохранитьКак.ПолучитьГлавноеМеню();

Полный пример кода

Копировать     Выделить всё

Функция Новый_Нажатие() Экспорт
	Сообщить("Новый_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецФункции

ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll");
Ф = Новый ФормыДляОдноСкрипта();
Форма1 = Ф.Форма();
Форма1.Отображать = Истина;
Форма1.Показать();
Форма1.Активизировать();

ГлавноеМеню1 = Ф.ГлавноеМеню();
ЭлементыМеню1 = ГлавноеМеню1.ЭлементыМеню;
Подменю_Файл = ЭлементыМеню1.Добавить(Ф.ЭлементМеню("Файл"));
Подменю_Справка = ЭлементыМеню1.Добавить(Ф.ЭлементМеню("Справка"));

ЭлементыМеню2 = Подменю_Файл.ЭлементыМеню;
Подменю_Файл_Новый = ЭлементыМеню2.Добавить(Ф.ЭлементМеню("Новый", Ф.Действие(ЭтотОбъект, "Новый_Нажатие"), Ф.СочетаниеКлавиш.ShiftF10));
Подменю_Файл_Открыть = ЭлементыМеню2.Добавить(Ф.ЭлементМеню("Открыть", , Ф.СочетаниеКлавиш.ShiftF11));
Подменю_Файл_Сохранить = ЭлементыМеню2.Добавить(Ф.ЭлементМеню("Сохранить"));
Подменю_Файл_СохранитьКак = ЭлементыМеню2.Добавить(Ф.ЭлементМеню("Сохранить как..."));
Подменю_Файл_Выход = ЭлементыМеню2.Добавить(Ф.ЭлементМеню("Выход"));
Сообщить("ЭлементыМеню1.Количество = " + ЭлементыМеню1.Количество);
Форма1.Меню = ГлавноеМеню1;

ГлМеню = Подменю_Файл_СохранитьКак.ПолучитьГлавноеМеню();
Сообщить("ГлМеню.ЭлементыМеню.Количество = " + ГлМеню.ЭлементыМеню.Количество);

Ф.ЗапуститьОбработкуСобытий();

Тестовый код

Копировать     Выделить всё

Функция Новый_Нажатие() Экспорт
	Сообщить("Новый_Нажатие " + ТекущаяУниверсальнаяДатаВМиллисекундах());
КонецФункции

ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll");
Ф = Новый ФормыДляОдноСкрипта();
Форма1 = Ф.Форма();
Форма1.Отображать = Истина;
Форма1.Показать();
Форма1.Активизировать();

ГлавноеМеню1 = Ф.ГлавноеМеню();
ЭлементыМеню1 = ГлавноеМеню1.ЭлементыМеню;
Подменю_Файл = ЭлементыМеню1.Добавить(Ф.ЭлементМеню("Файл"));
Подменю_Справка = ЭлементыМеню1.Добавить(Ф.ЭлементМеню("Справка"));

ЭлементыМеню2 = Подменю_Файл.ЭлементыМеню;
Подменю_Файл_Новый = ЭлементыМеню2.Добавить(Ф.ЭлементМеню("Новый", Ф.Действие(ЭтотОбъект, "Новый_Нажатие"), Ф.СочетаниеКлавиш.ShiftF10));
Подменю_Файл_Открыть = ЭлементыМеню2.Добавить(Ф.ЭлементМеню("Открыть", , Ф.СочетаниеКлавиш.ShiftF11));
Подменю_Файл_Сохранить = ЭлементыМеню2.Добавить(Ф.ЭлементМеню("Сохранить"));
Подменю_Файл_СохранитьКак = ЭлементыМеню2.Добавить(Ф.ЭлементМеню("Сохранить как..."));
Подменю_Файл_Выход = ЭлементыМеню2.Добавить(Ф.ЭлементМеню("Выход"));
Форма1.Меню = ГлавноеМеню1;

ГлМеню = Подменю_Файл_СохранитьКак.ПолучитьГлавноеМеню();

Сообщить(?(Подменю_Файл_СохранитьКак.ПолучитьГлавноеМеню() = ГлМеню, "", "!!! ") + "Меню.ПолучитьГлавноеМеню (Menu.GetMainMenu) Метод" + " " + ТекущаяДата());