Нашёл в закромах старую наработку, которую когда-то делал для клиента, хотевшего "как логотип на сайте студии Татьяныча". Процедура меняет значение текущего цвета на 5 пунктов, устанавливает его для окрашиваемого объекта и рекурсивно вызывает себя через обработчик ожидания:
&НаКлиенте
Процедура СменитьЦвет()
Если Красный > Зеленый И Синий = 0 Тогда
Зеленый = Зеленый + 5;
ИначеЕсли Красный > 0 И Зеленый = 255 Тогда
Красный = Красный - 5;
ИначеЕсли Синий < Зеленый Тогда
Синий = Синий + 5;
ИначеЕсли Зеленый > 0 И Синий = 255 Тогда
Зеленый = Зеленый - 5;
ИначеЕсли Красный < Синий Тогда
Красный = Красный + 5;
Иначе
Синий = Синий - 5;
КонецЕсли;
Элементы.ВключитьПереливание.ЦветФона = Новый Цвет(Красный, Зеленый, Синий);
ПодключитьОбработчикОжидания("СменитьЦвет", 0.1, Истина);
КонецПроцедуры
Если лень копипейстить, прикрепил обработку, в которой плавно меняется цвет кнопки.
Вступайте в нашу телеграмм-группу Инфостарт
