Как увеличить размер шрифта в 1с 8.2








Казалось бы тривиальная задача — увеличить шрифт в 1С 8.2. Можно уменьшить разрешение рабочего стола, что не всегда есть гуд. Можно увеличить шрифт в Windows. Тоже свои минусы, отразится везде. Да и в терминальном режиме с этим туго, особенно в Windows Server 2008 R2.

Начинаем выкручиваться:

========================================================================================================
На примере БП 2.0 и УТ 10.3
========================================================================================================
В КОНФИГУРАТОРЕ:

1) Добавить регистр сведений «СтилиПользователей»
   Непериодический, независимый
   Измерения:
     — Пользователь ,тип СправочникСсылка.Пользователи
   Ресурсы:
     — НомерСтиля   ,тип Число 1.0

2) В ветке «Общие — Стили» скопировать стиль «Основной» в «Основной1».
   В стиле «Основной1» изменить Шрифт текста на Verdana,8
   (путем проб можно другой подобрать, я остановился на этом)

3) В модуле обычного приложения добавить функцию ПолучитьНомерСтиляПользователя()
   и вызов ее в процедуре ПередНачаломРаботыСистемы()

//+ASG
Функция ПолучитьНомерСтиляПользователя()
    
   

Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
|    СтилиПользователей.НомерСтиля
|ИЗ
|    РегистрСведений.СтилиПользователей КАК СтилиПользователей
|ГДЕ
|    СтилиПользователей.Пользователь = &Пользователь";

Запрос.УстановитьПараметр("Пользователь", ПараметрыСеанса.ТекущийПользователь);
Результат = Запрос.Выполнить().Выбрать();
Если Результат.Следующий() Тогда
Возврат Результат.НомерСтиля;
Иначе
Возврат 0;
КонецЕсли;

КонецФункции // ПолучитьНомерСтиляПользователя

// Процедура - обработчик события "Перед началом работы системы".
//
Процедура ПередНачаломРаботыСистемы(Отказ)

УправлениеПользователями.ПроверитьВозможностьРаботыПользователя(Отказ);

ГлавныйСтиль = БиблиотекаСтилей.Получить(ПолучитьНомерСтиляПользователя()); //+ASG

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

========================================================================================================
В РЕЖИМЕ 1С Предприятие:
1) В регистр «СтилиПользователей» («Операции — Регистры сведений — Стили пользователей)
прописать тех пользователей кому нужно покрупнее установив номер стиля = 1

На все уходит минут 15, правда придется «Включить возможность изменения»
в «Конфигурация — Поддержка — Настройка поддержки»

========================================================================================================
Вот такая она 1С 8.2. Альтернативного ничего не нашел… На сверхновизну не претендую. Думаю кому-нибудь
сгодится! Плюсики не помешают 🙂

64 Comments

  1. KliMich

    Вроде мелочь, но полезная. Особенно актуально для людей (пожилых) с плохим зрением!

    Однозначно плюс!

    Reply
  2. bforce

    Можете выложить сравнительный скриншот: было — стало? Почему-то я не вижу существенного увеличения шрифта. Может не туда смотрю?

    Reply
  3. Воронкин

    Кто будет использовать — необходимо обратить внимание, что надписей, в которых необходимо изменить шрифт несколько. А то для пользователей с плохим зрением (а это планируется для них) шрифт надписи увеличили, а шрифт кнопки нет и будут изменены размеры самой формы и элементов в ней.

    Reply
  4. bnw

    А просто редактирую Основной стиль и исправляю шрифт. После обновления все исправления, которые предлагает автор придется вносить снова руками…

    Reply
  5. asg1975

    (4) bnw, предложенный вариант настраивается под пользователей. Кто-то зрячий, кто-то не очень 🙂 Да и моники могут быть разные…

    Reply
  6. makas

    Полезное предложеие!

    Reply
  7. Totoro

    В типовых можно и не добавлять регистр — для этого подходит типовой регистр «НастройкиПользователей».

    Где можно добавлять свои настройки в режиме предприятия (или программно). В качестве значения — «булево» (крупный/не крупный) или «строка» (имя стиля, если не только шрифт меняем).

    И пользователю редактировать удобно и изменений мало. А в коде по имени настройки получать её значение.

    Reply
  8. Lyns_owner

    Мне понравилась идея, реализация лучше, чем в комментариях. Есть недочеты)

    Необходимо программно получать количество стилей, и, если для стиля установлен номер стиля больший, чем их существует — 1, то возвращать 0.

    Reply
  9. fishca

    Жаль только это не применимо к тонкому клиенту

    Reply
  10. KroVladS

    После всех моих попыток изменить шрифт, плыли формы, не влезали надписи и пр. неприятности.

    Особенно неприятно было когда сползла кнопка «выгрузить пачку», а узнали об этом в последний день сдачи отчётности 🙁

    Reply
  11. asg1975

    (8) Lyns_owner, Согласен, но считаю уже придирками…

    Reply
  12. asg1975

    (7) Totoro, Тоже вариант. Но изменения хоть и в одну строчку, но нужны

    Reply
  13. Totoro

    (12) К сожалению, да.

    ИМХО Твой вариант более удобен, если права на это изменение нужно ограничить или как универсальный.

    Reply
  14. Rad90210

    (10) KV1s, По любому. 7.7 — 8.2 — одно лечим, другое калечим. Либо использовать ВСЕ КАК ЕСТЬ, либо писать самому… В свете стоимостей на моники и стоиость часа работы программиста (а типовые бухии обновляются частенько) -!!! ЛИЧНО Я БЫ КУПИЛ МОНИТОР !!! А с поддержки не спрыгивал. И вообще — у каждого должно быть свое рабочее место — так что персонализировать нужно не только монитор — а и сразу всю станцию.

    Reply
  15. asg1975

    (14) Rad90210, можно и комп вносить в регистр. Тут уж как говорится «кому что».

    Reply
  16. Владимир Зайцев

    Самое-то,отчаялся уже найти это для своих расчетчиц.Спасибо.

    Reply
  17. may1c

    Многие просили, наверно следует попробовать…может кому и понравиться

    Reply
  18. TimofeySin

    А реально ли изменить стиль пользователя на «лету»? ну то есть он жмахает на кнопку и все меняется?

    Reply
  19. chmv

    я думаю на ходу можно, для отдельных форм.

    А так в цедом нет.

    Reply
  20. Serjeo

    При изменении стиля есть одно «НО…» от 1С. Например, установить шрифт размером 13-14 и выше уже будет проблематично. Вернее установить его в стиле конечно можно без проблем, а вот отображение в формах этого шрифта будет уже не корректно, т.к. все формы 1С заточены под определенный стиль и масштаб. Можете поставить размер шрифта 14 и посмотреть, что у вас произойдет с полями ввода, с таблицами и т.п. в формах. Так что тут нужно оговориться, что со стилями в 1с особо не поиграешься, иначе нужно будет переписать все формы под новый стиль. На платформе 7.7 с этим конечно проблем не было.

    Reply
  21. asg1975

    (20) Serjeo, согласен. Увеличивать до бесконечности не получится. Тот шрифт, который я указал, уже работает «на пределе». Но дело свое делает.У других сразу начинаются проблемы с проглатыванием буквы «р» и т.п.

    Reply
  22. sbr

    Реально нужная вещь.

    Спасибо автору и описание сделано хорошо.

    И обсуждение на форуме тоже дало пищу для дальнейших действий.

    Для себя, я конечно исправляю стиль, но это в конфигураторе, т.е. там где сам пишу.

    А вот теперь есть механизм настроить это пользователям…

    Reply
  23. shekl

    спасибо автору.

    мелочь но весьма полезна .

    бухгалтера будут рады))

    Reply
  24. Shade

    Спасибо, а то в терминалке ничего не помогает :))))))))))

    Reply
  25. Shade

    Отдельный плюс за подробнейщее описание и скриншоты 🙂

    Reply
  26. asg1975

    (24) Shade, В терминалке Windows Server 2008 у меня не получилось изменить разрешение или шрифт. Админы сказали «никак». Может админы такие, может я что не допонял. Поэтому и пошел другим путем 🙂

    Reply
  27. Shade

    (26) Вот вот 🙂 Я тоже долго бился, но все тщетно для 1С :)))

    Reply
  28. mistermp3

    Если немного пофилософствовать на эту тему, то становится просто смешно. Неужели корректное масштабирование это такая сверхзадача, что её нельзя реализовать нормально? Это же не только в 1с так! Вот я пользуюсь программой (1с или не 1с не важно). Хочу сделать крупнее — почему я не могу сделать это каким-то простым способом (контрлплюс например)?

    Технологически оно все понятно, макеты, сетки, растискивание… Но блин, 21 век.

    Какое нафиг user friendly если программы и ОСи не умеют самого простого?!

    В бинокле блин и то крутилка есть, но тут как же — компутер ведь!!! Сложная штуковина!

    Это же капец — лезть в конфигуратор что бы изменить размер! Самое смешное, что все к такому положению дел привыкли (и в других программах).

    Reply
  29. asg1975

    (28) mistermp3, в 21 веке все меганакручено, IT-специалисты без работы не останутся.

    Reply
  30. Gazulo

    Клиент попросил изменить шриф, все сделал как в статье….Все получилось, класно. Спасибо.

    Reply
  31. alexware

    Тема актуальная. Пользователи со стажем до сих пор вспоминают в этом плане 1С 7.7. И задают вопросы, почему же здесь нет.

    Reply
  32. _n26__

    Все получилось, спасибо большое

    Reply
  33. papami

    Чтобы не ломать конфигурацию писал на базе ActiveX RDP простого клиента для подключения к терминалу. При запуске программно понижал до необходимого разрешение монитора. При свертке или закрытии окна — возвращал исходное… Ну и все в таком духе. Работает народ — устраивает.

    Reply
  34. asg1975

    (33) papami, Ну нет слов, одни почести. Варианты всегда есть, другое дело, что они не очевидны бывают. Вот я бы до такого не заморочился, мне проще в 1С поковыряться 🙂

    Reply
  35. papami

    Вопрос не в том что проще, а в СМЫСЛЕ ломать конфигурацию из-за одного человека с плохим зрением. Если уже были изменения — согласен, то что Вы предлагаете, будет хорошим решением.

    И не надо так ерепениться))) Я про это

    Ну нет слов, одни почести
    Reply
  36. asg1975

    (35) papami, Вы слишком болезненно воспринимаете окружающий мир. Если вы заметили, никаких кавычек на указанной вами фразе я не ставил. А это как раз и значит, что я действительно уважаю ваше решение…

    Reply
  37. madmpro

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

    Reply
  38. Urv

    Как поменять стиль для отчетов?

    Картинка в приложенном файле

    Reply
  39. Urv

    вроде файл прикреплял попробую еще раз.

    Reply
  40. zqzq

    Можно ещё вызвать экранную лупу Виндовз ))) Даже сочетание клавиш есть.

    Вообще 1С к пользователям одним местом повёрнута, я представляю что будет при UltraHD мониторе от эппл, с микроскопом разглядывать.

    Но перемены грядут в 8.3 http://v8.1c.ru/o7/201212ui/

    Reply
  41. deadman66

    (40) Urv, шрифт в отчетах меняется в самих отчетах в настройках в оформлении в режиме предприятия

    Reply
  42. de0nis

    А шрифт который в параметрах системы (Сервис — Параметры — Текст) он вообще что меняет? по-моему как-то вообще ничего не меняется если его изменять.

    Спасибо, хорошее решение.

    У себя только сделал стиль не числом, а строкой и выбор по наименованию стиля из списка выбора:

    Для каждого ТекСтиль из Метаданные.Стили Цикл
    СписокСтилей.Добавить(ТекСтиль.Имя, ТкСтиль.Синоним);
    КонецЦикла

    И потом выбор избиблиотеки по имени

    БибилиотекаСтилей[ПолучитьНомерСтиляПользователя()] 
    Reply
  43. ViksVik

    Грамотное решение. И описано наглядно. А монополисту 1С должно быть, как минимум, стыдно за свои элементарные недоработки. Даже в 1С77 эта функция прекрасно работала. «Шаг вперёд, два шага назад» – и так во многом у них.

    Reply
  44. 1985Alex1985

    Спасибо 🙂 Как раз искал как сделать

    Reply
  45. serg1983

    да облом в том что В «модуле обычного приложения» надо лезть, а клиент у другого франчайзи и при обновлении надо отслеживать им

    Reply
  46. serg1983

    народ а в БП 3.0 это пойдет

    Reply
  47. KillHunter

    Ну тут два варианта либо на самом деле купить монитор, как советует один товарищь, либо изменить в программном коде, хотя это тоже не вариант, может это все реализовано под платформой 8.3 ?

    Reply
  48. serg1983

    клиентам обновили платформу,конфигурацию. БП 3.0 и вот результат(в файле). Как щас исправить. Помогите людям

    Reply
  49. kanalya

    А знает кто почему теперь шрифт заголовков окон стал курсивным? Я поменял только «Шрифт текста».

    Reply
  50. trumanl

    (7) Totoro, спасибо за идею. Добавил в настройки пользователя новую характеристику «Стиль пользователя», выбираю из списка метаданных.

    Reply
  51. trumanl
    Функция ПолучитьСтильПользователя()
    
    Значение = УправлениеПользователями.ПолучитьЗначениеПоУмолчанию(глЗначениеПеременной(«глТекущийПользователь»), «СтильПользователя»);
    
    Если Не ПустаяСтрока(Значение) Тогда
    Возврат БиблиотекаСтилей[Значение];
    Иначе
    Возврат БиблиотекаСтилей.Основной;
    КонецЕсли;
    
    КонецФункции

    Показать

    Reply
  52. anton448

    Автору спасибо за идею, реально помогло ваше решение! 🙂

    Reply
  53. alitvin

    Увеличить системный шрифт и не трогать 1С нафиг

    Reply
  54. user_2010

    а как увеличить шрифт в 8.3?

    Reply
  55. xoxmaister

    круто получилось! спасибо!

    Reply
  56. sinchro

    А что делать если в Операциях нету Регистра сведений (Операции — Регистры сведений)

    Reply
  57. jaroslav.h

    Super — puper, дякую!

    Reply
  58. sokir

    А можно поменять шрифт для конфигуратора?

    Типа для дерева метаданных. Особенно интересует что бы уменьшилось окно «Все роли», т.к. как на ноуте с разрешением 1370х780 просто невозможно работать.

    Reply
  59. mistermp3

    Интересно, как сейчас обстоят дела с веб-интерфейсом 1с. Много конфигураций корректно (и полнофункционально) работают? Ведь в браузере масштабировать легче легкого

    Reply
  60. ZevS

    Господиии. намудохаол то намудохал.. Все меняется гораздо проще.. в конфигураторе парой кликов мышки.. там все предусмотрено давно.

    Reply
  61. jaroslav.h

    (61) земляк, ти мабуть суть справи не зрозумів, візьми для окремого користувача і зміни шрифт для списку документів тоді і зрозумієш в чому годнота рішенням автора.

    Reply
  62. Alex26071991

    (7) Немного не понял… как это реализовано, по подробнее инструкции нет? Буду очень признателен 🙂

    Reply
  63. user1103660

    Увеличить шрифт в 1С:

    1. Пуск

    2. Панель управления.

    3. Экран.

    4. Удобство чтения с экрана поставьте 125%

    Reply
  64. alex_merfi

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

    Попробовал применить данный код в конфигурации «Управление производственным предприятием». Если пользователь с полными правами, то измененный стиль загружается, если же права неполные, увы обычный стиль. Как же задействовать перед началом работы системы, чтобы применился новый (измененный) стиль для пользователя с неполными правами?

    Reply

Leave a Comment

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