Оформление строк табличной части в 8.2

14.05.11

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

Стандартом в 1с является, когда все строки табличной части имеют одинаковый шрифт, цвет шрифта и цвет фона строки. Но иногда нужно, чтобы строки выделялись по некоторому признаку. В качестве примера будет использовать, что в документе реализации строки выделялись в зависимости от склада, с которого отгружается номенклатура.

1. Для справочник "Склады" необходимо добавить реквизиты: ЦветФонаСтроки, ЦветШрифтаСтроки, ШрифтСтроки, тип - ХранилищеЗначения.

1

2. Для управляемой формы элемента добавить реквизиты с идентичными названиями, у первых 2 тип "Цвет", у 3 - "Шрифт" и вынести эти реквизиты на управляемую форму.

2

3. В модуль формы вставить следующий код:

 (Системные процедуры не копируются отсюда, а создаются в модуле и там добавляется код, иначе 1с не поймет, что они системные)


&НаСервере
Процедура ЗаполнитьРеквизитыОформленияСтрокНаФорме()
   
ЭтоНовый                = Объект.Ссылка.Пустая();
   
ОбъектДанные            = ДанныеФормыВЗначение(Объект,Тип("СправочникОбъект.Склады"));

   
ЦветФонаСтрокиХранимый  = ОбъектДанные.ЦветФонаСтроки.Получить();
   
ОформлениеСодержится    = ТипЗнч(ЦветФонаСтрокиХранимый) = Тип("Цвет");

    Если
ЭтоНовый или Не ОформлениеСодержится Тогда
       
ЦветФонаСтроки      = ЦветаСтиля.ЦветФонаПоля;
       
ЦветШрифтаСтроки    = ЦветаСтиля.ЦветТекстаФормы;
       
ШрифтСтроки         = WindowsШрифты.ШрифтДиалоговИМеню;
    Иначе
       
ЦветФонаСтроки      = ЦветФонаСтрокиХранимый;
       
ЦветШрифтаСтроки    = ОбъектДанные.ЦветШрифтаСтроки.Получить();
       
ШрифтСтроки         = ОбъектДанные.ШрифтСтроки.Получить();
    КонецЕсли;
КонецПроцедуры

&НаКлиенте
Процедура ПриОткрытии(Отказ)
   
ЗаполнитьРеквизитыОформленияСтрокНаФорме();
КонецПроцедуры

&НаСервере
Процедура ПередЗаписьюНаСервере(Отказ, ТекущийОбъект, ПараметрыЗаписи)
   
ТекущийОбъект.ЦветФонаСтроки        = Новый ХранилищеЗначения(ЦветФонаСтроки);
   
ТекущийОбъект.ЦветШрифтаСтроки      = Новый ХранилищеЗначения(ЦветШрифтаСтроки);
   
ТекущийОбъект.ШрифтСтроки           = Новый ХранилищеЗначения(ШрифтСтроки);
КонецПроцедуры

 

 

4. В общий модуль, выполняемый на сервере, к примеру ОбщегоНазначенияСервер вставляемся процедура ОформитьСтрокиТЧ:


&НаСервере
Процедура ОформитьСтрокиТЧ(Объект,УсловноеОформление,ТипОбъектаПодробный,ИмяТЧ,ИмяОбъектаСОформлением) Экспорт
   
ТипОбъектаСтр               = СтрЗаменить(ТипОбъектаПодробный,".",Символы.ПС);
   
ТипОбъектаКраткий           = СтрПолучитьСтроку(ТипОбъектаСтр,1);
   
ИмяОформляемогоМетаданного  = СтрПолучитьСтроку(ТипОбъектаСтр,2);

    Если
ТипОбъектаКраткий = "ДокументОбъект" Тогда
       
ТипОбъектаКраткий = "Документы";
    ИначеЕсли
ТипОбъектаКраткий = "СправочникОбъект" Тогда
       
ТипОбъектаКраткий = "Справочники";
    КонецЕсли;

   
ОбъектДанные = ДанныеФормыВЗначение(Объект,Тип(ТипОбъектаПодробный));

    Для каждого
СтрТЧ Из ОбъектДанные[ИмяТЧ] Цикл

       
ОбъектСОформлением  = СтрТЧ[ИмяОбъектаСОформлением];

       
ЦветФонаСтроки      = ОбъектСОформлением.ЦветФонаСтроки.Получить();
       
ЦветШрифтаСтроки    = ОбъектСОформлением.ЦветШрифтаСтроки.Получить();
       
ШрифтСтроки         = ОбъектСОформлением.ШрифтСтроки.Получить();

       
ЭлементУсловногоОформления = УсловноеОформление.Элементы.Добавить();
       
ЭлементУсловногоОформления.Использование    = Истина;

       
ОформлениеУО        = ЭлементУсловногоОформления.Оформление;
       
ОтборУО             = ЭлементУсловногоОформления.Отбор;
       
ОформляемыеПоляУО   = ЭлементУсловногоОформления.Поля;


       
ОформлениеУО.УстановитьЗначениеПараметра("ЦветФона", ЦветФонаСтроки);
       
ОформлениеУО.УстановитьЗначениеПараметра("ЦветТекста", ЦветШрифтаСтроки);
       
ОформлениеУО.УстановитьЗначениеПараметра("Шрифт", ШрифтСтроки);

       
ЭлементОтбора                = ОтборУО.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
       
ЭлементОтбора.ЛевоеЗначение  = Новый ПолеКомпоновкиДанных("Объект." + ИмяТЧ + "." + ИмяОбъектаСОформлением);
       
ЭлементОтбора.ВидСравнения   = ВидСравненияКомпоновкиДанных.Равно;
       
ЭлементОтбора.ПравоеЗначение = ОбъектСОформлением;
       
ЭлементОтбора.Использование  = Истина;

        Для каждого
РеквизитТЧ Из Метаданные[ТипОбъектаКраткий][ИмяОформляемогоМетаданного].ТабличныеЧасти[ИмяТЧ].Реквизиты Цикл

           
НазваниеРеквизита   = РеквизитТЧ.Имя;
           
ОформляемоеПоле     = ОформляемыеПоляУО.Элементы.Добавить();
           
ОформляемоеПоле.Поле = Новый ПолеКомпоновкиДанных(ИмяТЧ + НазваниеРеквизита);

        КонецЦикла;

       
ОформляемоеПоле      = ОформляемыеПоляУО.Элементы.Добавить();
       
ОформляемоеПоле.Поле = Новый ПолеКомпоновкиДанных(ИмяТЧ + "НомерСтроки");

    КонецЦикла;
КонецПроцедуры

 

 5. В модуль формы элемента документа "Реализация товаров и услуг" вставить процедуру ОформитьСтрокиТЧСервер и вызов ее в процедурах ТоварыСкладПриИзменении и ПриСозданииНаСервере


&НаКлиенте
Процедура ТоварыСкладПриИзменении(Элемент)
   
ОформитьСтрокиТЧСервер();
КонецПроцедуры

&НаСервере
Процедура ОформитьСтрокиТЧСервер()
   
ОбщегоНазначенияСервер.ОформитьСтрокиТЧ(Объект,УсловноеОформление,"ДокументОбъект.РеализацияТоваровУслуг","Товары","Склад");
КонецПроцедуры

 

 

Результат:

 3

 

Вступайте в нашу телеграмм-группу Инфостарт

См. также

Работа с интерфейсом Анализ учета Мониторинг 1С:Предприятие 8 1С 8.3 1C:Бухгалтерия 1С:Бухгалтерия 3.0 1С:Библиотека стандартных подсистем 1С:ERP Управление предприятием 2 1С:Управление холдингом 1С:Зарплата и Управление Персоналом 3.x 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Управление торговлей 11 Платные (руб)

Создайте свой функциональный интерфейс в любой конфигурации 1С с помощью расширения Infostart Dashboard. Настраивайте панели виджетов с метриками, индикаторами и показателями на начальном экране. Узнайте возможность внедрения подсистемы у себя в конфигурации с помощью бесплатной обработки "Анализ внедрения подсистемы 1С Infostart Dashboard"!

28800 руб.

27.03.2025    57993    32    28    

46

Разработка Инструментарий разработчика Работа с интерфейсом Адаптация типовых решений Нейросети 1C:Бухгалтерия 1C:ERP 1С:ЗУП 1С:КА 1С:УНФ 1С:УТ 1С:Розница 1С:ДО 1С:ERP Управление предприятием 2 Платные (руб)

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

36000 руб.

28.08.2025    2963    1    2    

4

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

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

5160 руб.

29.06.2020    22992    33    6    

52

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

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

6000 руб.

14.01.2016    58391    20    25    

46

Консолидация данных Работа с интерфейсом Программист Пользователь 1С:Предприятие 8 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 1C:ERP Узбекистан Беларусь Кыргызстан Россия Казахстан Платные (руб)

Знакомая ситуация? Пользователи, особенно менеджеры, уверены: отборов много не бывает. Идут пожелания добавить в форму списка еще один быстрый фильтр, еще два, еще пять... В итоге интерфейс превращается в нагромождение полей отбора, а потребность в «самом главном» отборе, который «вот прямо сейчас нужен», все равно не закрыта. Универсальное расширение, которое решает эту проблему элегантно и технологично. С его помощью в любую форму списка можно легко добавить панель настраиваемых кнопок-закладок, каждая из которых применяет сложный фильтр-запрос, а так же показывает актуальное количество элементов в реальном времени.

5988 руб.

17.10.2025    872    1    0    

2

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

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

5040 руб.

06.10.2020    12970    8    8    

14

Работа с интерфейсом Программист Стажер 1С:Предприятие 8 Бесплатно (free)

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

20.08.2024    43790    mrXoxot    44    

138
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. AlexO 136 13.04.14 21:34 Сейчас в теме
(0) Это общая функция "ОформитьСтрокиТЧ" для всех документов?
И зачем включена обработка реквизитов ТЧ?
Вообще, проще сделать при ОбновлениеОтображения раскраску строк.
Для отправки сообщения требуется регистрация/авторизация