Переключить текстовое и текстово-картинное подменю собственных команд

Подменю содержит те же две действующие команды. Иконка берётся из собственной библиотеки конфигурации, а не из произвольного файла.

Подготовка

1. В отдельной своей конфигурации УчебнаяКонфигурацияСинтаксиса создайте новую внешнюю обработку с пустой управляемой основной формой. Вставьте весь модуль выбранного опыта.

2. Назначьте событию ПриСозданииНаСервере одноимённый обработчик. Не создавайте вручную реквизиты, панель, группу, команды или кнопки: всё добавляется кодом.

3. В памяти формы собственная Книга: количество 3, цена 250, сумма 750. Кнопка +1 меняет количество, кнопка Вернуть 3 возвращает его, сумма пересчитывается.

4. Внешняя кнопка Сменить отображение находится вне учебной панели и группы. Её можно нажать даже при компактном показе или закрытом подменю.

5. Настольный тонкий/толстый клиент Windows 8.5.1.1343. Важность подменю появилась в 8.5.1. Фактическую фигуру, цвета и компактность проверьте глазами в активной теме.

6. Только во втором опыте нужна своя общая картинка УчебныйМаркер: импортируйте lesson-assets/owned-book-marker-32.png в общую картинку своей учебной конфигурации и обновите её.

&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
    Реквизиты = Новый Массив;
    Реквизиты.Добавить(Новый РеквизитФормы("Количество", Новый ОписаниеТипов("Число")));
    Реквизиты.Добавить(Новый РеквизитФормы("Сумма", Новый ОписаниеТипов("Число")));
    ЭтаФорма.ИзменитьРеквизиты(Реквизиты);
    Количество = 3;
    Сумма = Количество * 250;
    Для Каждого Имя Из СтрРазделить("Количество,Сумма", ",") Цикл
        Поле = Элементы.Добавить("УчебноеПоле" + Имя, Тип("ПолеФормы"));
        Поле.Вид = ВидПоляФормы.ПолеНадписи;
        Поле.ПутьКДанным = Имя;
        Поле.Заголовок = "Книга: " + Имя;
    КонецЦикла;
    Панель = Элементы.Добавить("УчебнаяКоманднаяПанель", Тип("ГруппаФормы"));
    Панель.Вид = ВидГруппыФормы.КоманднаяПанель;
    Группа = Элементы.Добавить("УчебнаяГруппаКоманд", Тип("ГруппаФормы"), Панель);
    Группа.Заголовок = "Действия с собственной Книгой";
    Группа.Вид = ВидГруппыФормы.Подменю;
    Если Метаданные.ОбщиеКартинки.Найти("УчебныйМаркер") = Неопределено Тогда
        ВызватьИсключение "Нужна своя общая картинка УчебныйМаркер";
    КонецЕсли;
    Группа.Картинка = БиблиотекаКартинок.УчебныйМаркер;
    Группа.Отображение = ОтображениеКнопки.КартинкаИТекст;
    СоздатьСвоюКоманду("УвеличитьКоличество", "+1 Книга", Группа, ВидКнопкиФормы.КнопкаКоманднойПанели);
    СоздатьСвоюКоманду("ВернутьТри", "Вернуть 3", Группа, ВидКнопкиФормы.КнопкаКоманднойПанели);
    СоздатьСвоюКоманду("СменитьОтображение", "Сменить отображение", Неопределено, ВидКнопкиФормы.ОбычнаяКнопка);
КонецПроцедуры

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

&НаКлиенте
Процедура УвеличитьКоличество(Команда)
    Количество = Количество + 1;
    Сумма = Количество * 250;
    Сообщить("Собственная Книга: " + Строка(Количество) + ", сумма " + Строка(Сумма));
КонецПроцедуры

&НаКлиенте
Процедура ВернутьТри(Команда)
    Количество = 3;
    Сумма = Количество * 250;
    Сообщить(Количество = 3 И Сумма = 750);
КонецПроцедуры

&НаКлиенте
Процедура СменитьОтображение(Команда)
    Группа = Элементы.УчебнаяГруппаКоманд;
    Если Группа.Отображение = ОтображениеКнопки.КартинкаИТекст Тогда
        Группа.Отображение = ОтображениеКнопки.Текст;
    Иначе
        Группа.Отображение = ОтображениеКнопки.КартинкаИТекст;
    КонецЕсли;
    Сообщить("Отображение подменю: " + Строка(Группа.Отображение));
    Сообщить(Группа.Картинка = БиблиотекаКартинок.УчебныйМаркер);
    Сообщить(Сумма = Количество * 250);
КонецПроцедуры

Разбор по шагам

1. Создать группу вида Подменю внутри собственной панели и проверить наличие своего библиотечного ресурса.

2. Назначить библиотечную картинку и режим КартинкаИТекст.

3. Открыть подменю, выполнить +1 или Вернуть 3 и проверить значения формы.

4. Внешняя кнопка меняет отображение Текст/КартинкаИТекст. Иконка по-прежнему назначена, даже если режим Текст её не показывает.

5. Проверить действия после каждого изменения: внешний вид не является разрешением на запись данных.

Как проверить результат

1. Внешняя команда выводит режим и две Истина: библиотечное назначение сохранено, сумма согласована с количеством.

2. Пункты подменю меняют только учебную Книгу: +1 увеличивает количество, Вернуть 3 возвращает 750.

Ожидаемый результат

Правильно разделены назначение иконки, режим показа и работа команд внутри подменю.

На что обратить внимание

1. Картинка подменю программно принимает только пустую или библиотечную картинку.

2. Скрытая в режиме Текст иконка не означает удаление общей картинки из конфигурации.

3. Не привязывайте это подменю к типовой рабочей панели ради упражнения.

Пример не запускался в вашей базе. Перед применением проверьте его в указанном учебном контексте.