ЭлементыМеню.Удалить (MenuItemCollection.Remove) Метод

Синтаксис

Удалить(<Элемент>)

Параметры

Элемент (обязательный)
Тип: ЭлементМеню (MenuItem).
Удаляемый объект ЭлементМеню (MenuItem).

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

Описание

Удаляет элемент ЭлементМеню (MenuItem) из коллекции.

Примечание

Пример

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

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


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

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

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

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

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

Элементы = Подменю_Файл_СохранитьКак.ЭлементыМеню;
Подменю_Файл_СохранитьКак_Файл_txt = Элементы.Добавить(Ф.ЭлементМеню("Файл *.txt"));
Подменю_Файл_СохранитьКак_Файл_rtf = Элементы.Добавить(Ф.ЭлементМеню("Файл *.rtf"));

Форма1.Меню = ГлавноеМеню1;

ГлавноеМеню1.ЭлементыМеню.Удалить(Подменю_Справка);

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

Тестовый код 

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


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

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

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

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

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

Элементы = Подменю_Файл_СохранитьКак.ЭлементыМеню;
Подменю_Файл_СохранитьКак_Файл_txt = Элементы.Добавить(Ф.ЭлементМеню("Файл *.txt"));
Подменю_Файл_СохранитьКак_Файл_rtf = Элементы.Добавить(Ф.ЭлементМеню("Файл *.rtf"));

Форма1.Меню = ГлавноеМеню1;

ГлавноеМеню1.ЭлементыМеню.Удалить(Подменю_Справка);

Сообщить(?(
ГлавноеМеню1.ЭлементыМеню.Количество = 1
, "", "!!! ") + "ЭлементыМеню.Удалить (MenuItemCollection.Remove) Метод" + " " + ТекущаяДата());

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

ЭлементыМеню (MenuItemCollection) Класс | Библиотека OneScriptForms