Как увеличить размер шрифта на 1С: 8.3.7 (с модификацией кода управляемой формы)

07.07.16

Разработка - Работа с интерфейсом

В платформе 8.3.7 (без режима совместимости) окончательно сломали вариант увеличения шрифта в управляемых формах, которым мы пользовались ранее.
Поэтому оставалось либо ждать выхода 8.3.10, либо изобретать свой велосипед.
Решение нашлось, но только не для всех.

Предыстория.

У нас вариант запуска 1С: "Обычное приложение" с управляемыми формами. Поэтому ранее для увеличения размера текста вполне подходил вариант со стилями конфигурации.

Смотрелось довольно убого, но работало. С приходом 8.3.7 - все сломалось окончательно.

1С обещает в версии платформы 8.3.10 исправить ситуацию из коробки, но ждать что-то не хочется. Да и непонятно, будет ли этот механизм работать в "обычном приложении".

 

Решение оказалось простым и работающим во всех вариантах запуска 1С:

Можно программно изменить масштаб отображения шрифта любого элемента на форме:

Элементы.Реквизит1.ШрифтЗаголовка = Новый Шрифт(Элементы.Реквизит1.ШрифтЗаголовка,,,,,,,110);
Элементы.Реквизит1.Шрифт = Новый Шрифт(Элементы.Реквизит1.Шрифт,,,,,,,117);

Для увеличения масштаба отображения достаточно вызвать на сервере метод установки масштаба шрифтов из каждой формы, которую мы хотим увеличить или уменьшить.

Так что пользователям конфигураций на поддержке (типа БП 3.0) моя статья не будет полезна. Frown

Разве что в УТ 11, получится что-то сделать с помощью их механизма программной подписки на события формы, но в этом я не силён. Undecided

В итоге у меня получилось вот так:

Процедура ИзменитьШрифт(ИсходныйШрифт, Масштаб)
	//Чтобы избежать повторного увеличения при неоднократном вызове масштабирования
	НовыйМасштаб = (Масштаб/ИсходныйШрифт.Масштаб)*100;
	Если НовыйМасштаб <> 100 Тогда
		ИсходныйШрифт = Новый Шрифт(ИсходныйШрифт,,,,,,,НовыйМасштаб);
	КонецЕсли;
КонецПроцедуры

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

масштаб шрифт увеличить крупный зрением форма настройка 8.3.7 8.3.10

См. также

Работа с интерфейсом Системный администратор Программист Платформа 1С v8.3 Управляемые формы 1C:Бухгалтерия Платные (руб)

Механизм «Динамическое управление доступом к элементам форм объектов 1С8» предназначен для обеспечения возможности оперативного управления видимостью и доступностью элементов форм документов и справочников продуктов фирмы «1С» «1С:Предприятие 8». Решение универсальное, встраивается в любую конфигурацию с минимальными доработками, что позволяет без проблем обновлять типовые решения.

5000 руб.

14.01.2016    55465    17    23    

43

Работа с интерфейсом Программист Платформа 1С v8.3 1C:Бухгалтерия 1С:ERP Управление предприятием 2 Платные (руб)

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

2400 руб.

29.06.2020    19749    28    6    

44

Работа с интерфейсом Программист Стажер Платформа 1С v8.3 Бесплатно (free)

Это инструкция по дизайну форм в среде 1С. Гайд охватывает рекомендации и стандарты для оптимизации пользовательского интерфейса. В гайде содержатся указания по использованию элементов интерфейса, включая как основные, так и продвинутые аспекты. Предоставляются также примеры и антипримеры для наглядного понимания принципов дизайна

20.08.2024    22048    mrXoxot    44    

128

Работа с интерфейсом Программист Платформа 1С v8.3 Бесплатно (free)

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

27.05.2024    11108    smielka    37    

105

Работа с интерфейсом Платформа 1С v8.3 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Зарплата и Управление Персоналом 3.x 1С:Управление нашей фирмой 3.0 Бесплатно (free)

Добавьте новогоднего настроения! Расширение создает декорацию в виде гирлянды на некоторых формах объектов.

27.12.2023    17997    1226    elcoan    53    

125

Инструментарий разработчика Работа с интерфейсом Программист Платформа 1С v8.3 1C:Бухгалтерия Абонемент ($m)

Подходит для создания web-страниц для замены управляемых форм 1С, красивых отчетов, интерфейса мобильного приложения на платформе 1С и для простых страниц веб-сайтов.

3 стартмани

10.04.2023    12683    167    acces969    31    

126

Работа с интерфейсом Программист Платформа 1С v8.3 1C:Бухгалтерия Абонемент ($m)

"MVC плохо применима в 1С" - познакомьтесь с моделью состояния и, возможно, ваше мнение поменяется! Представленное решение является эволюционным развитием идеи реализации MVC для 1С. В новой версии добавлены DSL для описания модели состояния, а также параметризация свойств параметров и элементов формы.

1 стартмани

05.07.2022    7459    kalyaka    6    

32
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. Поручик 4661 07.07.16 09:10 Сейчас в теме
У меня бухгалтер наоборот попросила уменьшить размер шрифтов в БП 3, чтобы было как в БП 2.
6. Stepka1206 05.08.16 20:45 Сейчас в теме
(1) Поручик, Вариант отображения сделай компактный для всей конфы в целом.
2. serega_new 07.07.16 14:42 Сейчас в теме
3. Дмитрий74Чел 239 13.07.16 07:27 Сейчас в теме
А разве через Расширение нельзя такое сделать?
5. TopSergey 20 14.07.16 18:33 Сейчас в теме
(3) Дмитрий74Чел,

Вроди бы и да.

Но расширения сам не использую.
Не понятно, сколько там багов ещё не пофиксили.
4. Yashazz 4805 13.07.16 08:54 Сейчас в теме
Учитывая свежие новости из зазеркалья, в 8.3.10 эта проблема исчезнет.
Оставьте свое сообщение