Перестроить собственные поля страницы горизонтально и вертикально

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

Подготовка

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

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

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

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

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

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

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

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

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

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

1. Группировка страницы организует реальные четыре дочерних поля, а не скрытый пустой контейнер.

2. ПоложениеЗаголовка каждого поля Авто, поэтому ПоложениеЗаголовковПодчиненных страницы может управлять его заголовком.

3. Задать относительные ширины и интервалы, отдельно выравнивание самой группы и подчинённых элементов.

4. Команда меняет только направление раскладки; данные формы не переназначает.

5. ВажностьПриОтображении относится к мобильной адаптации. Чтение этого свойства в настольном клиенте не доказывает мобильный эффект.

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

1. Первое нажатие выводит Вертикальная, второе Горизонтальная; четыре проверки интервалов/ширин/заголовков Истина.

2. Название Книга и количество 3 сохраняются. Если вы изменили поле вручную, сохраняется именно ваш текущий ввод.

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

Размещение страницы проверяется на её собственном наполнении с сохранением введённых значений.

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

1. Одинаковая задаёт относительную ширину элементов, не гарантирует одинаковое число пикселей всех полей в любой раскладке.

2. ПоложениеЗаголовковПодчиненных не переопределяет заголовки флажков автоматически и игнорируется мобильным интерфейсом.

3. Горизонтальное размещение многих широких полей требует проверки небольшого окна, не только чтения enum.

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