Цвет индикатора в зависимости от значения

29.08.17

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

+18 –
> > >
  • Screenshot_20170829_141359.png
  • Screenshot_20170829_141510.png
  • Screenshot_20170829_141540.png
  • Screenshot_20170829_141613.png
Функция, которая выдает значение цвета, в зависимости от передаваемого значения и максимально возможного значения.

Файлы

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование Скачано Купить файл
Цвет индикатора в зависимости от значения:
.epf 7,39Kb ver:1
6 2 500 руб. Купить

Подписка PRO — скачивайте любые файлы со скидкой до 85% из Базы знаний

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

Оформить подписку и скачать решение со скидкой

Вы можете заказать платную доработку или адаптацию этой разработки под вашу конфигурацию на «Бирже заказов».

  • 0% комиссии — оплата напрямую исполнителю;
  • Исполнители любого масштаба — от отдельных специалистов до команд под проект;
  • Прямой обмен контактами между заказчиком и исполнителем;
  • Безопасная сделка — при необходимости;
  • Рейтинги, кейсы и прозрачная система откликов.

Очень часто, для лучшего восприятия, необходимо окрасить индикатор в зависимости от значения.
Данная обработка является оберткой для демонстрации работы функции ПолучитьОттенок.
Фактически нужен градиент от красного(255,0,0) до зеленого(0,255,0) или от 0 до 120 H в HSV шкале.

Функция ПолучитьОттенок на входе получает текущее Значение и Максимальное значение, а на выход выдает цвет.
 

Функция ПолучитьОттенок(ТекущееЗначение,Максимум) экспорт // зеленый -максимальный, красный - минимальный
	
//Определяем часть
часть=ТекущееЗначение/максимум;
шаг=510/максимум; //сквозной шаг

//зеленый (0,255,0)
//желтый  (255,255,0)
//красный(255,0,0)
// фактически это движение в HSV, где меняется только Hue в пределах от 0 до 120
компонентR=0;
компонентG=0;
//определяем к какой половине спектра отностится наше число
Если часть > 0.5 тогда
	компонентR=цел(255-((ТекущееЗначение-0.5*максимум)*шаг));
	компонентG=255;
	
Иначе	
	компонентR=255;
	компонентG=цел(ТекущееЗначение*шаг);
		
КонецЕсли;	
	
возврат Новый Цвет(компонентR,компонентG,0);
	
КонецФункции

 

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

Индикатор цвет

+18 –

См. также

Infostart Dashboard: Монитор показателей, виджеты и дашборды в 1С 8.3

Работа с интерфейсом Анализ учета Мониторинг 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    83164    58    42    

68
Настройки управляемых форм (списков, объектов), заполнение реквизитов по условиям, контроль заполнения, доступ для 1С:УТ 11

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

Настройки управляемых форм (списков, объектов), заполнение реквизитов по условиям, контроль заполнения, условное оформление, доступ и пр. для 1С

6100 руб.

20.02.2018    23563    25    21    

42
Динамическое управление видимостью и доступностью элементов форм (УФ) (8.3.6+)

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

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

6100 руб.

14.01.2016    60603    22    25    

47
Универсальный редактор картинок 1С, хранимых в базе, с возможностью рисования

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

Универсальный редактор картинок 1С предназначен для обработки изображений в режиме «Предприятие», с возможностью рисовать на них. Поддерживается работа как в обычных формах (толстый клиент) так и на управляемых формах (тонкий клиент). В комплект поставки включены Расширения для легкого подключения данного функционала в БК, УТ, КА и ERP. Обработка позволяет редактировать как картинки, хранимые в базе, так и графические файлы с диска на файловой системе. Помимо базовых функций (изменение размеров, преобразование формата, обрезание картинки, повороты и т.п.) – редактор имеет богатый набор инструментов для рисования. Доступна функция вставки изображения из буфера обмена. Объект может быть использован: на стороне клиента, на стороне сервера, из внешнего соединения. Обработка будет особенно полезна тем, кто вносит картинки в базу. Функционал реализуется с использованием JavaScript и бесплатного ПО ImageMagick (без использования внешних компонент).

6100 руб.

16.01.2015    68484    46    60    

85
Управление дашбордами в 1С

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

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

5246 руб.

29.06.2020    24714    34    6    

53
Удобные фильтры: динамические кнопки-закладки для списков в 1С

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

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

6088 руб.

17.10.2025    2128    3    0    

2
Дизайнер форм 1С

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

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

36600 руб.

28.08.2025    7972    2    2    

6
Загрузка табличного документа в таблицу значений. Пять строк кода, которые изменили мир

Универсальные функции Программист 1С:Предприятие 8 1C:Бухгалтерия Бесплатно (free)

Благодаря этим пяти строчкам можно больше не заморачиваться с загрузкой из внешних файлов. Пользуюсь везде, всегда и постоянно.

21.05.2024    57917    dimanich70    85    

175
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. webester 26 30.08.17 05:05 Сейчас в теме
Еще надо параметр "Инвертировать" в функцию, что бы она выдавала красный ближе к концу :)
+ – Ответить
2. kc-ropa 44 30.08.17 08:58 Сейчас в теме 
Функция ПолучитьОттенок(ТекущееЗначение,Максимум,инвертировать=ложь) экспорт // зеленый -максимальный, красный - минимальный
	
//Определяем часть
часть=ТекущееЗначение/максимум;
шаг=510/максимум; //сквозной шаг

//зеленый (0,255,0)
//желтый  (255,255,0)
//красный(255,0,0)
// фактически это движение в HSV, где меняется только Hue в пределах от 0 до 120
компонентR=0;
компонентG=0;
//определяем к какой половине спектра отностится наше число
Если часть > 0.5 тогда
	компонентR=цел(255-((ТекущееЗначение-0.5*максимум)*шаг));
	компонентG=255;
	
Иначе	
	компонентR=255;
	компонентG=цел(ТекущееЗначение*шаг);
		
КонецЕсли;	
Если инвертировать тогда возврат Новый Цвет(компонентG,компонентR,0);	
				   иначе возврат Новый Цвет(компонентR,компонентG,0);
КонецЕсли;	
	
КонецФункции
Показать
itriot11; +1 – Ответить
3. artbear 1587 30.08.17 16:50 Сейчас в теме
А Управляемые формы?
+ – Ответить
7. kc-ropa 44 31.08.17 09:05 Сейчас в теме
(3) Нет необходимости.
+ – Ответить
4. Fragster 1167 30.08.17 19:34 Сейчас в теме
Не интересно. Например в https://infostart.ru/public/551431/ начальные и конечные цвета задаются, а далее получается плавный градиент между ними.
+ – Ответить
6. kc-ropa 44 31.08.17 09:04 Сейчас в теме
(4) Спасибо, я его не видел.
+ – Ответить
5. DrAku1a 1795 31.08.17 04:41 Сейчас в теме
Немножко математической магии: 
компоненты = ТекущееЗначение / Максимум * 510;
компонентR = Мин(510 - компоненты, 255);
компонентG = Мин(компоненты, 255);
возврат Новый Цвет(компонентR,компонентG,0)

Для того, чтобы инвертировать - меняем местами R и G
TreeDogNight; +1 – Ответить
8. kc-ropa 44 31.08.17 09:06 Сейчас в теме
(5) Красота! Так гораздо компактней и быстрее, но менее очевидно.
+ – Ответить
9. DrAku1a 1795 31.08.17 17:09 Сейчас в теме
(8) На самом деле - всё становится очевидно, если нарисовать графики изменения цвета.
Кстати, из этого графика становится примерно ясен алгоритм перехода из одного произвольного цвета в другой произвольный цвет.
Прикрепленные файлы:
TreeDogNight; +1 – Ответить
10. DrAku1a 1795 01.09.17 08:33 Сейчас в теме
(9) 
Функция ПолучитьКомпонентОттенка(КомпонентНач, КомпонентКон, Коэффициент)
	Если КомпонентКон=КомпонентНач Тогда
		Возврат КомпонентНач;
	ИначеЕсли КомпонентКон>КомпонентНач Тогда
		Возврат КомпонентНач + 2 * (КомпонентКон - КомпонентНач) * Коэффициент;
	Иначе
		Возврат КомпонентНач + 2 * (КомпонентНач - КомпонентКон) * (1-Коэффициент);
	КонецЕсли;
КонецФункции

Функция ПолучитьОттенокЦвета(ЦветНач, ЦветКон, ТекущееЗначение, МаксЗначение, МинЗначение=0)
	Если МаксЗначение<=МинЗначение или ТекущееЗначение<МинЗначение Тогда
		Возврат ЦветНач;
	ИначеЕсли ТекущееЗначение>МаксЗначение Тогда
		Возврат ЦветКон;
	КонецЕсли;
	Коэффициент = ТекущееЗначение / (МаксЗначение - МинЗначение);
	КомпонентКрасный = ПолучитьКомпонентОттенка(ЦветНач.Красный, ЦветКон.Красный, Коэффициент);
	КомпонентЗеленый = ПолучитьКомпонентОттенка(ЦветНач.Зеленый, ЦветКон.Зеленый, Коэффициент);
	КомпонентСиний = ПолучитьКомпонентОттенка(ЦветНач.Синий, ЦветКон.Синий, Коэффициент);
	Возврат Новый Цвет(КомпонентКрасный, КомпонентЗеленый, КомпонентСиний);
КонецФункции
Показать
TreeDogNight; +1 – Ответить
11. TreeDogNight 22 17.11.17 20:51 Сейчас в теме
(10)

Сделал обработку на основании вашего алгоритма
Прикрепленные файлы:
ГенераторЦветов.epf
mammadov.zaur.77; +1 – Ответить
12. DrAku1a 1795 19.11.17 09:33 Сейчас в теме
(11) Нужно подправить "ПолучитьКомпонентОттенка": добавить ограничения максимума и минимума возвращаемого значения, и когда цвет темнеет (третья формула условия) - нужно вместо КомпонентНач брать КомпонентКон: 
Функция ПолучитьКомпонентОттенка(КомпонентНач, КомпонентКон, Коэффициент)
    Если КомпонентКон=КомпонентНач Тогда
        Возврат КомпонентНач;
    ИначеЕсли КомпонентКон>КомпонентНач Тогда
        Возврат Макс(Мин(КомпонентНач + 2 * (КомпонентКон - КомпонентНач) * Коэффициент, КомпонентКон), КомпонентНач);
    Иначе
        Возврат Макс(Мин(КомпонентКон + 2 * (КомпонентНач - КомпонентКон) * (1 - Коэффициент), КомпонентНач), КомпонентКон);
    КонецЕсли;
КонецФункции
Показать

По-хорошему, ещё можно бы округлять результат или отбрасывать дробную часть, но 1С отрабатывает и так.
Прикрепленные файлы:
TreeDogNight; +1 – Ответить
Для отправки сообщения требуется регистрация/авторизация