ТаблицаФормы.ВысотаЗаголовка

Разделить высоту заголовка, шапки колонок и подвала

У учебной таблицы три разных области. Подвал количества показывает 4 из собственных строк; переключение высот не добавляет товары.

Подготовка

1. В учебной базе: Файл → Новый → Внешняя обработка. Создайте управляемую форму и назначьте её основной. Дайте обработке имя УчебнаяТаблица.

2. Не добавляйте вручную реквизит Товары и одноимённые элементы: код создаст их при открытии. Модуль формы для этой задачи должен быть пустым.

3. В свойствах формы → События свяжите ПриСозданииНаСервере с одноимённой процедурой. Сохраните отдельную учебную EPF и откройте через Файл → Открыть.

4. Данные Книга/Ручка создаются в памяти формы. Справочники, документы и регистры вашей конфигурации не читаются и не записываются.

5. Проверяйте в настольном тонком/толстом или веб-клиенте 8.5.1.1343, не в мобильном приложении. Для каждого урока отдельная учебная форма с пустым модулем.

6. Изменение учебных строк остаётся только в открытой форме. При её новом открытии снова создаются Книга/3 и Ручка/1. Настройки таблицы не являются правами доступа к данным.

&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
    НовыеРеквизиты = Новый Массив;
    НовыеРеквизиты.Добавить(Новый РеквизитФормы("Товары", Новый ОписаниеТипов("ТаблицаЗначений")));
    НовыеРеквизиты.Добавить(Новый РеквизитФормы("Код", Новый ОписаниеТипов("Строка"), "Товары", "Код"));
    НовыеРеквизиты.Добавить(Новый РеквизитФормы("Наименование", Новый ОписаниеТипов("Строка"), "Товары", "Название"));
    НовыеРеквизиты.Добавить(Новый РеквизитФормы("Количество", Новый ОписаниеТипов("Число",
        Новый КвалификаторыЧисла(9, 0, ДопустимыйЗнак.Неотрицательный)), "Товары", "Количество"));
    ЭтаФорма.ИзменитьРеквизиты(НовыеРеквизиты);
    Данные = Новый ТаблицаЗначений;
    Данные.Колонки.Добавить("Код", Новый ОписаниеТипов("Строка"));
    Данные.Колонки.Добавить("Наименование", Новый ОписаниеТипов("Строка"));
    Данные.Колонки.Добавить("Количество", Новый ОписаниеТипов("Число",
        Новый КвалификаторыЧисла(9, 0, ДопустимыйЗнак.Неотрицательный)));

    СтрокаТовара = Данные.Добавить();
    СтрокаТовара.Код = "A-01";
    СтрокаТовара.Наименование = "Книга";
    СтрокаТовара.Количество = 3;
    СтрокаТовара = Данные.Добавить();
    СтрокаТовара.Код = "B-02";
    СтрокаТовара.Наименование = "Ручка";
    СтрокаТовара.Количество = 1;

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

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

&НаКлиенте
Процедура УчебноеДействие(Команда)
    Таблица = Элементы.ТаблицаТоваров;
    Если Таблица.ВысотаЗаголовка = 2 Тогда
        ВысотаОбластей = 1;
    Иначе
        ВысотаОбластей = 2;
    КонецЕсли;
    Таблица.ВысотаЗаголовка = ВысотаОбластей;
    Таблица.ВысотаШапки = ВысотаОбластей;
    Таблица.ВысотаПодвала = ВысотаОбластей;
    Сообщить(СтрШаблон("Заголовок %1; шапка %2; подвал %3; строк %4; количество %5",
        Таблица.ВысотаЗаголовка, Таблица.ВысотаШапки, Таблица.ВысотаПодвала,
        Товары.Количество(), Товары.Итог("Количество")));
КонецПроцедуры

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

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

2. ВысотаЗаголовка относится к подписи таблицы, ВысотаШапки — к заголовкам колонок, ВысотаПодвала — к нижней области.

3. Подвал количества получает текст Всего: 4 из данных формы, не из рабочего регистра.

4. Кнопка меняет высоты между 1/2 строками; данные Книга/Ручка не меняются.

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

1. Изначально три высоты равны 2, после первого нажатия 1, после второго снова 2.

2. В сообщении всегда строк 2, количество 4. Нижний текст Всего: 4 сохраняется.

3. Внешний вид зависит от темы, шрифта и ширины; это строки интерфейса, не точное число пикселей.

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

Увидены три области таблицы и их независимость от количества товаров.

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

1. ВысотаЗаголовка=0 означает автоматическую высоту, а не скрытый заголовок.

2. ТекстПодвала сам не пересчитывается при последующем изменении товаров; здесь строки не редактируются этим обработчиком.

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