Как увеличить размер шрифта в 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 не будет опубликован. Обязательные поля помечены *