Как увеличить размер шрифта в 1с 8.3 (обычные формы)
Разработка - Работа с интерфейсом
Начинаем выкручиваться:
========================================================================================================
На примере БП 2.0 и УТ 10.3
========================================================================================================
В КОНФИГУРАТОРЕ:
1) Добавить регистр сведений "СтилиПользователей"
Непериодический, независимый
Измерения:
- Пользователь ,тип СправочникСсылка.Пользователи
Ресурсы:
- НомерСтиля ,тип Число 1.0
2) В ветке "Общие - Стили" скопировать стиль "Основной" в "Основной1".
В стиле "Основной1" изменить Шрифт текста на Verdana,8
(путем проб можно другой подобрать, я остановился на этом)
3) В модуле обычного приложения добавить функцию ПолучитьНомерСтиляПользователя()
и вызов ее в процедуре ПередНачаломРаботыСистемы()
//+ASG
Функция ПолучитьНомерСтиляПользователя()
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| СтилиПользователей.НомерСтиля
|ИЗ
| РегистрСведений.СтилиПользователей КАК СтилиПользователей
|ГДЕ
| СтилиПользователей.Пользователь = &Пользователь";
Запрос.УстановитьПараметр("Пользователь", ПараметрыСеанса.ТекущийПользователь);
Результат = Запрос.Выполнить().Выбрать();
Если Результат.Следующий() Тогда
Возврат Результат.НомерСтиля;
Иначе
Возврат 0;
КонецЕсли;
КонецФункции // ПолучитьНомерСтиляПользователя
// Процедура - обработчик события "Перед началом работы системы".
//
Процедура ПередНачаломРаботыСистемы(Отказ)
УправлениеПользователями.ПроверитьВозможностьРаботыПользователя(Отказ);
ГлавныйСтиль = БиблиотекаСтилей.Получить(ПолучитьНомерСтиляПользователя()); //+ASG
КонецПроцедуры
========================================================================================================
В РЕЖИМЕ 1С Предприятие:
1) В регистр "СтилиПользователей" ("Операции - Регистры сведений - Стили пользователей)
прописать тех пользователей кому нужно покрупнее установив номер стиля = 1
На все уходит минут 15, правда придется "Включить возможность изменения"
в "Конфигурация - Поддержка - Настройка поддержки"
========================================================================================================
Вот такая она 1С 8.2. Альтернативного ничего не нашел... На сверхновизну не претендую. Думаю кому-нибудь
сгодится! Плюсики не помешают :)
Вступайте в нашу телеграмм-группу Инфостарт
Вы можете заказать платную адаптацию этой статьи под ваши задачи на «Бирже заказов».
- 0% комиссии — оплата напрямую исполнителю;
- Исполнители любого масштаба — от отдельных специалистов до команд под проект;
- Прямой обмен контактами между заказчиком и исполнителем;
- Безопасная сделка — при необходимости;
- Рейтинги, кейсы и прозрачная система откликов.
См. также
Работа с интерфейсом Анализ учета Мониторинг 1С:Предприятие 8 1С 8.3 1C:Бухгалтерия 1С:Бухгалтерия 3.0 1С:ERP Управление предприятием 2 1С:Управление холдингом 1С:Зарплата и Управление Персоналом 3.x 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Управление торговлей 11 Платные (руб)
Создайте свой функциональный интерфейс в любой конфигурации 1С с помощью расширения Infostart Dashboard. Настраивайте панели виджетов с метриками, индикаторами и показателями на начальном экране. Узнайте возможность внедрения подсистемы у себя в конфигурации с помощью бесплатной обработки "Анализ внедрения подсистемы 1С Infostart Dashboard"!
31720 руб.
27.03.2025 92443 69 44
Консолидация данных Работа с интерфейсом Разработчик Пользователь 1С:Предприятие 8 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 1C:ERP Узбекистан Беларусь Кыргызстан Россия Казахстан Платные (руб)
Знакомая ситуация? Пользователи, особенно менеджеры, уверены: отборов много не бывает. Идут пожелания добавить в форму списка еще один быстрый фильтр, еще два, еще пять... В итоге интерфейс превращается в нагромождение полей отбора, а потребность в «самом главном» отборе, который «вот прямо сейчас нужен», все равно не закрыта. Универсальное расширение, которое решает эту проблему элегантно и технологично. С его помощью в любую форму списка можно легко добавить панель настраиваемых кнопок-закладок, каждая из которых применяет сложный фильтр-запрос, а так же показывает актуальное количество элементов в реальном времени.
6088 руб.
17.10.2025 3690 3 0
Разработка Инструментарий разработчика Работа с интерфейсом Адаптация типовых решений Нейросети 1C:Бухгалтерия 1C:ERP 1С:ЗУП 1С:КА 1С:УНФ 1С:УТ 1С:Розница 1С:ДО 1С:ERP Управление предприятием 2 Платные (руб)
Разработка "Дизайнер форм 1С" реализована в виде расширения 1С и является универсальным инструментом для разработки прототипа форм с целью демонстраций, технических заданий и т.д. Без участия разработчика с возможностью экспорта в файл внешней обработки и генерации формы используя искусственный интеллект.
36600 руб.
28.08.2025 10400 2 2
Работа с интерфейсом Разработчик Стажер 1С:Предприятие 8 Бесплатно (free)
Это инструкция по дизайну форм в среде 1С. Гайд охватывает рекомендации и стандарты для оптимизации пользовательского интерфейса. В гайде содержатся указания по использованию элементов интерфейса, включая как основные, так и продвинутые аспекты. Предоставляются также примеры и антипримеры для наглядного понимания принципов дизайна
20.08.2024 57520 mrXoxot 44
Работа с интерфейсом Разработчик 1С:Предприятие 8 Бесплатно (free)
Пример простого и симпатичного прогресс-бара в динамическом списке, без картинок, используя редактирование запроса.
27.05.2024 30032 smielka 39
Инструментарий разработчика Работа с интерфейсом Разработчик 1С 8.3 Абонемент ($m)
Подходит для создания web-страниц для замены управляемых форм 1С, красивых отчетов, интерфейса мобильного приложения на платформе 1С и для простых страниц веб-сайтов.
1 стартмани
10.04.2023 19517 190 acces969 31
Работа с интерфейсом Разработчик 1С:Предприятие 8 1C:Бухгалтерия Бесплатно (free)
Питничная фантазия на возможности в разработке интерфейсов формы с помощью Платформы 1С - делаем свою подсказку. Публикация содержит готовую библиотеку программного формирования данной подсказки.
12.08.2022 17001 top_1c 39
Работа с интерфейсом Разработчик 1С:Предприятие 8 1C:Бухгалтерия Абонемент ($m)
"MVC плохо применима в 1С" - познакомьтесь с моделью состояния и, возможно, ваше мнение поменяется! Представленное решение является эволюционным развитием идеи реализации MVC для 1С. В новой версии добавлены DSL для описания модели состояния, а также параметризация свойств параметров и элементов формы.
1 стартмани
05.07.2022 17991 kalyaka 8
Где можно добавлять свои настройки в режиме предприятия (или программно). В качестве значения - "булево" (крупный/не крупный) или "строка" (имя стиля, если не только шрифт меняем).
И пользователю редактировать удобно и изменений мало. А в коде по имени настройки получать её значение.
Необходимо программно получать количество стилей, и, если для стиля установлен номер стиля больший, чем их существует - 1, то возвращать 0.
Спасибо автору и описание сделано хорошо.
И обсуждение на форуме тоже дало пищу для дальнейших действий.
Для себя, я конечно исправляю стиль, но это в конфигураторе, т.е. там где сам пишу.
А вот теперь есть механизм настроить это пользователям...
Технологически оно все понятно, макеты, сетки, растискивание... Но блин, 21 век.
Какое нафиг user friendly если программы и ОСи не умеют самого простого?!
В бинокле блин и то крутилка есть, но тут как же - компутер ведь!!! Сложная штуковина!
Это же капец - лезть в конфигуратор что бы изменить размер! Самое смешное, что все к такому положению дел привыкли (и в других программах).
И не надо так ерепениться))) Я про это
Вообще 1С к пользователям одним местом повёрнута, я представляю что будет при UltraHD мониторе от эппл, с микроскопом разглядывать.
Но перемены грядут в 8.3
Спасибо, хорошее решение.
У себя только сделал стиль не числом, а строкой и выбор по наименованию стиля из списка выбора:
Для каждого ТекСтиль из Метаданные.Стили Цикл
СписокСтилей.Добавить(ТекСтиль.Имя, ТкСтиль.Синоним);
КонецЦиклаИ потом выбор избиблиотеки по имени
БибилиотекаСтилей[ПолучитьНомерСтиляПользователя()] 
Функция ПолучитьСтильПользователя()
Значение = УправлениеПользователями.ПолучитьЗначениеПоУмолчанию(глЗначениеПеременной("глТекущийПользователь"), "СтильПользователя");
Если Не ПустаяСтрока(Значение) Тогда
Возврат БиблиотекаСтилей[Значение];
Иначе
Возврат БиблиотекаСтилей.Основной;
КонецЕсли;
КонецФункции Показать1. Пуск
2. Панель управления.
3. Экран.
4. Удобство чтения с экрана поставьте 125%
Попробовал применить данный код в конфигурации "Управление производственным предприятием". Если пользователь с полными правами, то измененный стиль загружается, если же права неполные, увы обычный стиль. Как же задействовать перед началом работы системы, чтобы применился новый (измененный) стиль для пользователя с неполными правами?
Вы можете заказать платную консультацию или разработку у автора. Будет создан приватный заказ на «Бирже заказов» для автора.
№ 153181
Создание 23.09.12 00:18
Обновление 02.08.22 09:46
Просмотры 192477
Загрузки 0
Рейтинг
261
Комментарии 67
Код открыт Да
Рубрики Работа с интерфейсом
Кому
Системный администратор
,
Разработчик
Тип файла Нет файла
Платформа 1С:Предприятие 8
Конфигурация 1C:Бухгалтерия
Операционная система Windows
Страна Не имеет значения
Отрасль Не имеет значения
Налоги Не имеет значения
Вид учета Не имеет значения
Доступ к файлу Бесплатно (free)