Форум Программирование Общие вопросы программирования (Dev)

Конвертация цвета к абсолютному.

Конфигурации 1cv8 Платформа 1С v8.3

0. Gmix 408 19.01.13 15:23 Сейчас в теме

Нужно преобразовать не абсолютный цвет к абсолютному? Есть решение!!!

Перейти к публикации

Вознаграждение за ответ

Сумма: 0 $m

Добавили:
sondarium (2.00 $m)

Показать полностью

Отзывы

1. Steelvan 281 19.01.13 15:23 Сейчас в теме

Интересная программа.
Надо посмотреть, каким образом идет конвертация.
Актуальная задача.

Остальные комментарии

В избранное Подписаться на ответы

Свернуть все

1. Steelvan 281 19.01.13 15:23 Сейчас в теме

Интересная программа.
Надо посмотреть, каким образом идет конвертация.
Актуальная задача.

2. BubbleGumm 10.05.13 05:47 Сейчас в теме

Каким образом вы это сделали? Скачать нет возможности.

4. androidT1C 76 05.08.13 15:42 Сейчас в теме

(2) BubbleGumm, там всё просто: создаем пустой ТабДокумент, назначаем для .Область() любой цвет, сохраняем в HTML и находим циферки.

5. Yashazz 4509 22.09.13 13:05 Сейчас в теме

(4) Будете смеяться. Сделал, как вы написали - и нифига подобного, сохраняет всё те же названия, т.е. выглядит это как tr.R0 td.R0C0{ background-color: DeepSkyBlue; } и ни малейших циферок. Он там css лепит. Это, случаем, от платформы не зависит, а то у меня 8.2.17 - нэ?

8. pakill 43 03.10.13 10:14 Сейчас в теме

(5) Только так: ТабДокумент.Область().ЦветФона = WebЦвета.Оранжевый;
а вот так не годится: ТабДокумент.Область("R1C1").ЦветФона = WebЦвета.Оранжевый;

3. akor77 193 19.05.13 09:01 Сейчас в теме

на безрыбье и... (это в адрес 1с).
А автору огромное спасибо, всё-таки выкрутился, "акробатический номер", но работает.

6. Yashazz 4509 22.09.13 23:58 Сейчас в теме

В общем, вот: http://infostart.ru/public/201708/ и спасибо за красивую мысль, хоть она и очень узкоприменима, как оказалось.

7. pakill 43 01.10.13 14:08 Сейчас в теме

Спасибо, сам бы никогда не додумался.

Там в коде можно подсократить:

Функция HexToDec(HEX)
Число16 = СокрЛП(HEX);
Рез = 0;
Для к = 1 По СтрДлина(Число16) Цикл
Цифра16 = Сред(Число16, к, 1);
Рез = Рез * 16 + Найти("0123456789ABCDEF", Цифра16) - 1;
КонецЦикла;
Возврат Рез;
КонецФункции

9. v.selivanov 20 21.03.14 13:31 Сейчас в теме

Большое спасибо, полезная утилита!

10. dj_serega 385 13.03.15 11:57 Сейчас в теме

жаль что нет кода в описании

11. sondarium 175 17.02.16 21:23 Сейчас в теме

"ЧЦ=3; ЧН=000; ЧВН=; ЧГ=0"

12. soulsteps 73 25.08.17 13:58 Сейчас в теме

Благодарю, помогла статья

Оставьте свое сообщение

E-mail:

Вакансии

Функциональный архитектор
Москва
зарплата от 200 000 руб. до 300 000 руб.
Полный день

Программист 1С
Москва
зарплата от 150 000 руб.
Полный день

Ведущий программист 1С (удаленно)
Пермь
зарплата от 150 000 руб.
Полный день

Программист 1С
Домодедово
зарплата от 150 000 руб. до 180 000 руб.
Полный день

Консультант 1С
Москва
зарплата от 80 000 руб. до 150 000 руб.
Полный день