КоманднаяПанель.Рамка

Оформить панель, не меняя число и действия

Фон панели и фон её кнопок — разные настройки. Ориентация переключается, но имена и число команд сохраняются.

Подготовка

1. Создайте внешнюю обработку с новой обычной формой в отдельной учебной базе. Реквизит УчебноеКоличество: Число 9.0, поле ввода УчебноеКоличество связано с ним.

2. Добавьте пустую командную панель УчебнаяПанель, Источник действий оставьте пустым. Внешнюю обычную кнопку УчебнаяКоманда расположите вне панели. Не используйте существующую панель рабочей формы.

3. ПриОткрытии свяжите с одноимённой процедурой. Остальные действия вручную не назначайте: они связываются кодом через Действие. Экспортные действия панели принимают Кнопка, а обработчик внешней обычной кнопки — Элемент; ПриОткрытии самой формы остаётся без параметров.

4. Каждый урок — полный модуль отдельной копии формы. Толстый клиент с обычными формами. Два действия меняют или проверяют только своё число в памяти.

Процедура ПриОткрытии()
    УчебноеКоличество = 3;
    Панель = ЭтаФорма.ЭлементыФормы.УчебнаяПанель;
    Панель.АвтоЗаполнение = Ложь;
    Кнопки = Панель.Кнопки;
    Если Кнопки.Количество() <> 0 Тогда
        ВызватьИсключение "Для урока нужна новая пустая собственная панель";
    КонецЕсли;
    Кнопки.Добавить("Добавить", ТипКнопкиКоманднойПанели.Действие, "Добавить одну книгу", Новый Действие("ДобавитьУчебнуюКнигу"));
    Кнопки.Добавить("Проверить", ТипКнопкиКоманднойПанели.Действие, "Проверить количество", Новый Действие("ПроверитьУчебноеКоличество"));
    Кнопка = ЭтаФорма.ЭлементыФормы.УчебнаяКоманда;
    Кнопка.УстановитьДействие("Нажатие", Новый Действие("ВыполнитьУчебноеДействие"));
    Панель.Рамка = Новый Рамка(ТипРамки.Одинарная);
    Панель.ЦветРамки = Новый Цвет(180, 195, 210);
    Панель.ЦветТекстаКнопки = Новый Цвет(24, 40, 60);
    Панель.ЦветФона = Новый Цвет(235, 244, 255);
    Панель.ЦветФонаКнопки = Новый Цвет(245, 248, 252);
    Панель.Шрифт = Новый Шрифт(Панель.Шрифт, , 11, Ложь);
    Панель.ПрозрачныйФон = Ложь;
    Панель.Ориентация = Ориентация.Горизонтально;

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

Процедура ВыполнитьУчебноеДействие(Элемент) Экспорт
    Панель = ЭтаФорма.ЭлементыФормы.УчебнаяПанель;
    ИсходноеКоличество = УчебноеКоличество;
    Если Панель.Ориентация = Ориентация.Горизонтально Тогда
        Панель.Ориентация = Ориентация.Вертикально;
    Иначе
        Панель.Ориентация = Ориентация.Горизонтально;
    КонецЕсли;
    Сообщить("Ориентация: " + Строка(Панель.Ориентация));
    Сообщить(Панель.Кнопки.Количество() = 2);
    Сообщить(УчебноеКоличество = ИсходноеКоличество);
    Сообщить(НЕ Панель.ПрозрачныйФон);
КонецПроцедуры

Процедура ДобавитьУчебнуюКнигу(Кнопка) Экспорт
    Если УчебноеКоличество < 0 Тогда
        Сообщить("Сначала исправьте отрицательное учебное количество");
        Возврат;
    КонецЕсли;
    УчебноеКоличество = УчебноеКоличество + 1;
    Сообщить("Своих книг: " + Строка(УчебноеКоличество));
КонецПроцедуры

Процедура ПроверитьУчебноеКоличество(Кнопка) Экспорт
    Сообщить("Учебное количество: " + Строка(УчебноеКоличество));
КонецПроцедуры

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

1. ЦветФона относится к панели, ЦветФонаКнопки к кнопкам, ЦветТекстаКнопки к их надписям.

2. Рамка одинарная; ЦветРамки задаёт также цвет разделителей. Новый Шрифт сохраняет имя старого шрифта, меняя размер на 11.

3. Ориентация влияет на вывод надписей, но не изменяет расположение других элементов или размер самой панели автоматически.

4. Перед изменением сохраняется реальное число. После него сравнивается значение и количество собственных команд.

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

1. Три Истина и имя ориентации. Два нажатия возвращают исходное направление.

2. Оба действия всё ещё работают; при необходимости заранее увеличьте область панели в редакторе формы.

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

Оформление отделено от данных и состава команд.

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

1. Не обещается автоматическое переразмещение всех соседних контролов.

2. Цвета зависят от темы; визуальный результат требует проверки толстого клиента.

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