Убрать и вернуть собственную библиотечную картинку страницы

Картинка страницы программно принимает только пустую или библиотечную картинку. Растровые двоичные данные не присваиваются в это ограниченное свойство.

Подготовка

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

2. В событии формы ПриСозданииНаСервере назначьте одноимённый обработчик. Не создавайте вручную реквизиты НазваниеТовара, Количество, Цена, Сумма, две страницы и команду: код создаёт их сам.

3. Первая страница содержит вымышленную Книгу: количество 3, цена 250, сумма 750. Это только значения формы, не номенклатура, цены, документ или регистр базы.

4. Другая страница с собственным пояснением нужна для ручного переключения вкладок. Команда находится вне страниц и не скрывается при переключении.

5. Используйте настольный тонкий/толстый клиент 8.5.1.1343. Сохранённые свойства не доказывают видимый эффект во всех темах и интерфейсах; размеры окна и внешний вид проверяются вручную.

6. Только для этого урока: Конфигуратор → Общие → Общие картинки → УчебныйМаркер. Импортируйте lesson-assets/owned-book-marker-32.png рядом с руководством и обновите только учебную базу. Это уже имеющаяся собственная отметка 32×32.

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

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

КонецПроцедуры

&НаКлиенте
Процедура УчебноеДействие(Команда)
    Страница = Элементы.УчебнаяСтраницаКниги;
    Если Страница.Картинка = БиблиотекаКартинок.УчебныйМаркер Тогда
        Страница.Картинка = Новый Картинка;
        Сообщить("Своя картинка убрана");
    Иначе
        Страница.Картинка = БиблиотекаКартинок.УчебныйМаркер;
        Сообщить("Своя картинка возвращена из библиотеки");
    КонецЕсли;
    Сообщить(Страница.ЦветФона = Новый Цвет(240, 246, 255));
    Сообщить(Количество = 3 И Цена = 250 И Сумма = 750);
КонецПроцедуры

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

1. Импортировать предоставленный собственный PNG в общую картинку учебной конфигурации. Имя ресурса проверяется на сервере.

2. Присвоить библиотечную картинку и собственный цвет фона страницы.

3. Внешняя команда меняет библиотечный ресурс на пустой Картинка и обратно. Двоичный PNG напрямую не присваивается.

4. Проверить сохранность цвета и учебных числовых данных. Визуальный цвет сравнить с учётом темы и активной вкладки.

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

1. При создании одна проверка Истина. Первое нажатие убирает картинку, второе возвращает её; после каждого две проверки Истина при исходных данных.

2. Общая картинка в конфигурации не изменена и не удалена, цена и сумма формы остаются 250/750.

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

Есть реальный ресурс страницы, правильная очистка и восстановление без изменения общей картинки.

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

1. В ограниченном свойстве страницы нельзя использовать Новый Картинка(Base64Значение(...)) вместо библиотечной.

2. Пустая картинка здесь очищает назначение страницы, не удаляет ресурс конфигурации.

3. Чтение ЦветФона не доказывает одинаковое отображение в светлой и тёмной теме.

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