![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Сравнение цветов
Сашенька © (2004-06-08 18:59:00)может кто знает какие есть способы обьединения нескольких цветов
по похожести(коэфициент может меняться)
Сашенька (2004-06-16 15:21:00) [1]спасибо
Jurijs (2004-06-12 01:44:00) [2]Вот кусок кода для сравнения цветов. В принципе, то же, что Damage предлагал.
// This function is only intended to demonstrate the concept of finding the
// "nearest" color from a list.
FUNCTION NearestColor(CONST color: TColor): TColor;
CONST
ColorList: ARRAY[0..15] OF TColor =
(clBlack, clMaroon, clGreen, clOlive, clNavy, clPurple,
clTeal, clGray, clSilver, clRed, clLime, clYellow,
clBlue, clFuchsia, clAqua, clWhite);
VAR
DistanceSquared: INTEGER;
B1, B2: INTEGER;
G1, G2: INTEGER;
i: INTEGER;
R1, R2: INTEGER;
SmallestDistanceSquared: INTEGER;
BEGIN
RESULT := clBlack; // Assume black is closest color
SmallestDistanceSquared := 256*256*256; // Any distance would be shorter
R1 := GetRValue(color);
G1 := GetGValue(color);
B1 := GetBValue(color);
FOR i := 0 TO High(ColorList) DO
BEGIN
R2 := GetRValue(ColorList[i]);
G2 := GetGValue(ColorList[i]);
B2 := GetBValue(ColorList[i]);
DistanceSquared := SQR(R1-R2) + SQR(G1-G2) + SQR(B1-B2);
IF DistanceSquared < SmallestDistanceSquared
THEN BEGIN
RESULT := ColorList[i];
SmallestDistanceSquared := DistanceSquared
END
END
END {NearestColor};
Взято с http://homepages.borland.com/efg2lab/Library/Delphi/Graphics/Color.htm
Там же можно найти огромное количество информации (уже реализованные алгоритмы на Delphi) по работе с цветом.
Pipa (2004-06-11 19:43:00) [3]HSL + CMYK
Сашенька (2004-06-11 16:19:00) [4]я думаю вряд ли, здесь скорее нужно рассматривать цвет так, как воспринимает его человеческий глаз.
Amoeba (2004-06-11 15:56:00) [5]Может кластерный анализ поможет?
Amoeba (2004-06-11 15:54:00) [6]А что есть упоминаемый тобой коэффициент? Как делается группировка?
Сашенька (2004-06-11 13:35:00) [7]так я делал, группируются только те цвета которые практически идентичны, а при увеличеннии коэфициента в группу попадают не совсем похожие цвета, хотя те которые на глаз похожи тула не попадают.
Damage (2004-06-11 11:20:00) [8]Ну, например, раскладывай цвета на RGB составляющие и вычисляй разницу между каждой составляющей для двух цветов (по модулю).
Потом эти 3 числа, например, складывай - чем меньше результат, тем цвета похожее.
Сашенька (2004-06-11 11:15:00) [9]это же не такой и сложный вопрос, просто у меня все идеи кончились
Сашенька (2004-06-11 11:14:00) [10]ау