РаботаСДиалогами.УстановитьПодменюВыбораВидаОперации(ЭлементыФормы.ДействияФормы.Кнопки.ПодменюВидаОперации,
ВидОперации.Метаданные().ЗначенияПеречисления,
Новый Действие("ДействияФормыДействиеУстановитьОперацию"));
Для Каждого ЭлементЗаполнения Из ОбъектЗаполнения Цикл
Если Лев(ЭлементЗаполнения.Имя,7) = "Удалить" Тогда
Продолжить;
КонецЕсли;
ПунктМеню = ЭлементМеню.Кнопки.Добавить(ЭлементЗаполнения.Имя, ТипКнопкиКоманднойПанели.Действие,
ЭлементЗаполнения.Синоним, ОбъектОбработкиВыбораОперации);
ПунктМеню.ИзменяетДанные = Истина;
КонецЦикла;