Альтернативный способ выбора цвета на управляемых формах

Способ не новый. Но рабочий. Не использует внешние компоненты!

10 sm за подобную вещь — было жалко. Вот и наваял.

Применение: 

1. Создаём процедуру открытия формы

&НаКлиенте
Процедура ВыбратьЦвет(Команда)
Оповещение = Новый ОписаниеОповещения("ОповещениеУстановитьЦвет", ЭтаФорма);
ПараметрыФормы = Новый Структура;
ОткрытьФорму("Обработка.ВыборЦветаУФ.Форма", ПараметрыФормы, ЭтаФорма,,,,Оповещение);
КонецПроцедуры

2. Создаём процедуру оповещения
 

&НаКлиенте
Процедура ОповещениеУстановитьЦвет(Результат, ДополнительныеПараметры) Экспорт
Если Результат = Неопределено ИЛИ Результат = КодВозвратаДиалога.Отмена Тогда
Возврат;
КонецЕсли;
Цвет=результат;
//тут пишем обработку полученного цвета
КонецПроцедуры