Варианты настроек отчета указываются на закладке «Настройки»:
Создадим основную форму отчета. В модуле формы вызовем в процедуре «ПриОткрытии» выполним заполнение меню «Варианты отчета»:
Процедура ПриОткрытии()
ЗаполнитьМенюВариантыНастроек();
КонецПроцедуры
//Процедура Создает меню "Варианты отчетов" и пункты подменю для выбора вариантов настроек
Процедура ЗаполнитьМенюВариантыНастроек()
//Создание пункта меню
КнопкиДействияФормы = ЭлементыФормы.ДействияФормы.Кнопки;
НоваяКнопкаПодменю = КнопкиДействияФормы.Вставить(1,"МенюВариантыОтчетов", ТипКнопкиКоманднойПанели.Подменю, "Варианты отчетов");
НовоеДействие = Новый Действие("СменитьВариантНастройки");
//Заполнение пункта меню подпунктами
Сч = 0;
Для Каждого НастройкаСхемыКомпоновкиДанных Из СхемаКомпоновкиДанных.ВариантыНастроек Цикл
Сч = Сч + 1;
НоваяКнопка = КнопкиДействияФормы.МенюВариантыОтчетов.Кнопки.Добавить("ВариантНастройкиОтчета" + Сч, ТипКнопкиКоманднойПанели.Действие, НастройкаСхемыКомпоновкиДанных.Представление, НовоеДействие);
КонецЦикла;
КонецПроцедуры
Процедура СменитьВариантНастройки(Элемент)
ВыбранныйВариант = СхемаКомпоновкиДанных.ВариантыНастроек.Найти(Элемент.Текст);
Если ВыбранныйВариант > Неопределено Тогда
КомпоновщикНастроек.ЗагрузитьНастройки(ВыбранныйВариант.Настройки);
КонецЕсли;
КонецПроцедуры
В результате:
Комментарии
Спасибо!
Спасибо ).
Спасибо