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

11 Comments

1. BubbleGumm 10.05.2013 at 05:47

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

   Reply ↓
2. akor77 19.05.2013 at 09:01

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

   Reply ↓
3. androidT1C 05.08.2013 at 15:42

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

   Reply ↓
4. Yashazz 22.09.2013 at 13:05

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

   Reply ↓
5. Yashazz 22.09.2013 at 23:58

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

   Reply ↓
6. pakill 01.10.2013 at 14:08

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

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

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

   Reply ↓
7. pakill 03.10.2013 at 10:14

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

   Reply ↓
8. v.selivanov 21.03.2014 at 13:31

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

   Reply ↓
9. dj_serega 13.03.2015 at 11:57

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

   Reply ↓
10. sondarium 17.02.2016 at 21:23

    «ЧЦ=3; ЧН=000; ЧВН=; ЧГ=0»

    Reply ↓
11. soulsteps 25.08.2017 at 13:58

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

    Reply ↓