КоллекцияПодменю.Удалить (MenusCollection.Remove) Метод

Синтаксис

Удалить(<ПунктМеню>)

Параметры

ПунктМеню (обязательный)
Тип: ПунктМеню (MenuBarItem).
Значение для удаления из коллекции.

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

Описание

Удаляет ПунктМеню (MenuBarItem) из коллекции КоллекцияПодменю (MenusCollection).

Примечание

Пример

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


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

Тестовый код


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

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

Библиотека OneScriptTerminalGui