Приведение к заданому цвету.

[Speeker]

Есть база данных доступных цветов в формате RGB. И есть изображение в компоненте image. Необходимо привести пиксели из оригинального цвета к цвету максимально близкому из базы цветов. У кого какие идеи есть? Сам пробовал брать запросом в цикле пока не появится хотя бы один цвет +- n от заданого каждый раз при отрицательном результате увиличивая n на единицу.... получалось адски долго.... может у кого есть что то более презентабельное?

n:=0;
            repeat  
               aq1.SQL.Clear;
               aq1.SQL.Add('Select * from color_tbl where (r>='+inttostr(r+n)+') and(r<=' +inttostr(r-n)+')' +'and (g>='+inttostr(g-n)+') and(g<=' +inttostr(g+n)+')'+'and (b>='+inttostr(b+n)+') and(b<=' +inttostr(b-n)+')');
               aq1.Active:=true;
               n:=n+1   ;
               until (aq1.RecordCount>0) or (n>255);
               if aq1.RecordCount>0 then
               begin
               r:=AQ1R.Value;
               g:=aq1g.Value;
               b:=aq1b.Value;
               end  ;

[Vapaamies]

База данных цветов -- это что-то вроде квантования? Посмотри, например, как делается перевод в 256 цветов при кодировании в GIF. Конкретное количество цветов не имеет значения, алгоритм квантования универсален.

[Speeker]

В результате квантования, на сколько я понял, идет приведение к снижению количества цветов, но не идет к привязке к конкретному цвету. А тут именно необходимость для построения аналогичного рисунка используя только заданые цвета. Задача не стоит в уменьшении размера изображения, задача стоит в замене недоступных цветов доступными, наиболее близкими по значению

[Vapaamies]

А теперь перечитай свое сообщение и исключи из него взаимоисключающие параграфы.

[Speeker]

это о том что снижение размера будет? да будет но это не цель.... юольше чесно говоря не увидел... Возможно потому что я знаю о чом говорю, и кажется что понятно выразился, а со стороны может и не так. Буду юлагодарен если покажете....

[Vapaamies]

Поиск наиболее подходящего цвета из ограниченного набора -- и есть снижение количества цветов.

[Speeker]

Я ж написал но.... там нет привязки к определенным цветам.... Там поиск плавных переходов и замена пикселов на близкий однородный цвет. А мне необходим поиск наиболее близких цветов к базе

[Аватар]

1. Можно заменить >= and <= на between. Побыстрей работает
2. Индексы по полям r, g, b
3. А по HLS не лучше подбор будет?
4. Можно не наращивать на единичку, а с большим шагом брать и если есть результат, то или уменьшать его или программно в полученном наборе перебирать

[Vapaamies]

Сообщение от Speeker

А мне необходим поиск наиболее близких цветов к базе

В GIF тоже есть приведение к палитре web-safe.