ОбластьПостроенияДиаграммы.Шрифт

Оформить план/факт с собственной палитрой и честной шкалой

Ось начинается с нуля, верхняя граница 20 покрывает все значения. Цвет, подпись и таблица данных помогают понять график без расшифровки по цвету.

Подготовка

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

2. Не создавайте реквизит График и поле ДиаграммаТоваров вручную: код создаёт их в ПриСозданииНаСервере.

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

4. Каждый урок использует отдельный модуль/копию формы. Данные вымышлены: план и факт в штуках за три месяца, не данные учёта.

&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
    НовыеРеквизиты = Новый Массив;
    НовыеРеквизиты.Добавить(Новый РеквизитФормы("График", Новый ОписаниеТипов("Диаграмма")));
    ЭтаФорма.ИзменитьРеквизиты(НовыеРеквизиты);
    Диаграмма = Новый Диаграмма;
    Диаграмма.ТипДиаграммы = ТипДиаграммы.Гистограмма;
    План = Диаграмма.УстановитьСерию("plan");
    План.Текст = "План, шт.";
    Факт = Диаграмма.УстановитьСерию("actual");
    Факт.Текст = "Факт, шт.";
    Месяцы = Новый Массив;
    Месяцы.Добавить(Новый Структура("Ключ,Название,План,Факт", "2026-01", "Январь", 10, 8));
    Месяцы.Добавить(Новый Структура("Ключ,Название,План,Факт", "2026-02", "Февраль", 12, 11));
    Месяцы.Добавить(Новый Структура("Ключ,Название,План,Факт", "2026-03", "Март", 15, 16));
    Для Каждого Месяц Из Месяцы Цикл
        Точка = Диаграмма.УстановитьТочку(Месяц.Ключ);
        Точка.Текст = Месяц.Название;
        Диаграмма.УстановитьЗначение(Точка, План, Месяц.План);
        Диаграмма.УстановитьЗначение(Точка, Факт, Месяц.Факт);
    КонецЦикла;

    Палитра = Новый Массив;
    Палитра.Добавить(Новый Цвет(70, 110, 190));
    Палитра.Добавить(Новый Цвет(30, 140, 110));
    Диаграмма.УстановитьПалитру(Палитра);
    Диаграмма.ЗаполнитьЦветаСерий();
    ТекущаяПалитра = Диаграмма.ПолучитьПалитру();
    Сообщить(ТекущаяПалитра.Количество() = 2);
    Сообщить(ТекущаяПалитра[0].Красный = 70);
    Диаграмма.АвтоМинимальноеЗначение = Ложь;
    Диаграмма.АвтоМаксимальноеЗначение = Ложь;
    Диаграмма.МинимальноеЗначение = 0;
    Диаграмма.МаксимальноеЗначение = 20;
    Заголовок = Диаграмма.ОбластьЗаголовка;
    Заголовок.Текст = "Учебный план/факт за январь–март, шт.";
    Заголовок.Шрифт = Новый Шрифт("Arial", 12, Истина);
    Заголовок.ЦветТекста = Новый Цвет(25, 40, 60);
    Заголовок.ЦветФона = Новый Цвет(245, 247, 250);
    Заголовок.ПрозрачныйФон = Ложь;
    Заголовок.Рамка = Новый Рамка(ТипРамкиЭлементаУправления.БезРамки);
    Заголовок.ЦветРамки = Новый Цвет(210, 215, 225);
    Легенда = Диаграмма.ОбластьЛегенды;
    Легенда.Шрифт = Новый Шрифт("Arial", 10);
    Легенда.ЦветТекста = Новый Цвет(25, 40, 60);
    Легенда.ЦветФона = Новый Цвет(255, 255, 255);
    Легенда.ПрозрачныйФон = Ложь;
    Легенда.Прокрутка = Истина;
    Легенда.Рамка = Новый Рамка(ТипРамкиЭлементаУправления.БезРамки);
    Легенда.ЦветРамки = Новый Цвет(210, 215, 225);
    Построение = Диаграмма.ОбластьПостроения;
    Построение.ОтображатьШкалы = Истина;
    Построение.ОтображатьТаблицуДанных = Истина;
    Построение.КлючиВТаблицеДанных = Истина;
    Построение.ГоризонтальныеЛинииВТаблицеДанных = Истина;
    Построение.ВертикальныеЛинииВТаблицеДанных = Ложь;
    Построение.ВыравниваниеВТаблицеДанных = ГоризонтальноеПоложение.Право;
    Построение.ФорматВТаблицеДанных = "ЧДЦ=0; ЧГ=0; ЧН=0";
    Построение.ЦветФона = Новый Цвет(255, 255, 255);
    Построение.ЦветТекста = Новый Цвет(25, 40, 60);
    Построение.ЦветШкал = Новый Цвет(190, 195, 205);
    Построение.ПрозрачныйФон = Ложь;
    Построение.Шрифт = Новый Шрифт("Arial", 10);
    ЭтаФорма.График = Диаграмма;
    Поле = Элементы.Добавить("ДиаграммаТоваров", Тип("ПолеФормы"));
    Поле.Вид = ВидПоляФормы.ПолеДиаграммы;
    Поле.ПутьКДанным = "График";
    Поле.РастягиватьПоГоризонтали = Истина;
    Поле.РастягиватьПоВертикали = Истина;
КонецПроцедуры

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

1. УстановитьПалитру сохраняет два цвета в заданном порядке. ЗаполнитьЦветаСерий превращает автоматические цвета серий в абсолютные по палитре.

2. Границы 0–20 выбраны для наших данных с максимумом 16. Нулевая база столбцов сохраняет сравнимость высот.

3. Заголовок, легенда и область построения имеют собственные шрифты, цвета и прозрачность. Они не изменяют числовые данные.

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

5. Рамка БезРамки намеренно не рисуется, поэтому её ЦветРамки здесь не виден; переключение типа рамки делает цвет заметным.

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

1. Палитра имеет два цвета, первая красная компонента 70.

2. Шкала 0–20, максимум мартовского факта 16 не обрезан.

3. Таблица под графиком содержит 10/12/15 и 8/11/16 без дробных частей, а подписи явно называют штуки.

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

Диаграмма имеет воспроизводимое оформление, нулевую базу и доступную числовую таблицу.

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

1. Фиксированный максимум требует пересмотра при смене данных: 25 обрежется верхней границей 20.

2. Наличие палитры не заменяет различимые подписи и таблицу для читателя.

3. Обновление=Ложь не является ускорением управляемой формы: в этом уроке такое свойство не используется.

4. Если Arial недоступен, клиент подберёт замену; вид зависит от установленного шрифта.

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