Скачать: CL | DM;

Цвет значению   Найти похожие ветки 

← →
QuasiLamo ©   (2004-07-01 05:37) [0]

Требуется отобразить графически некоторую величину...
Надо бу как нибудь получить цвет для каждого ее значения...
Пока делаю так(от синего до красного)
Function TFEMPro.ColorFor(Const x, maxx, minx: double): Tcolor;
//на входе - число из диапазона minx..maxx, на выходе - цвет, который ему соответствует
// minx - синий, maxx - красный
Var
  i                : integer;
Begin
  If SameValue(minx, maxx, 1E-11) Then
     i:=0
  Else
     i:=round(x*(510/(maxX-minX))-(255*(maxX+minX)/(maxX-minX)));
  If i<0 Then
     result:=RGB(0, 255-abs(i), abs(i))
  Else
     If i>0 Then
        result:=RGB(abs(i), 255-abs(i), 0)
     Else
        result:=RGB(0, 255, 0);
End;

---

← →
QuasiLamo ©   (2004-07-01 05:39) [1]

хорошо бы как нибудь сделать чтобы начальнй и конечный цвета указывать можно было

---

← →
iZEN ©   (2004-07-01 05:56) [2]

Замечание по проектированию.
Сделать:
class function TFEMPro.ColorFor(const x, maxx, minx: double): TColor;

Ну и зарезервированные слова писать в нижнем регистре... ;)

---

← →
iZEN ©   (2004-07-01 06:01) [3]

Может быть подойдёт.
http://pc.infx.ru/p/Photoshop(Adobe)/stat16/stat.php
Цветовая модель HSB
Здесь заглавные буквы не соответствуют никаким цветам, а символизируют цвет, насыщенность и яркость. Все цвета располагаются по кругу, и каждому соответствует свой градус, то есть всего насчитывается 360 вариантов (красный — 0, желтый — 60, зеленый — 120 градусов и так далее).
Насыщенность определяет, насколько ярко выраженным будет выбранный цвет. 0 — серый, 100 — самый яркий и чистый из возможных вариантов.
Параметр яркости соответствует общепризнанному, то есть 0 — это черный цвет.
Такая цветовая модель намного беднее рассмотренной ранее RGB, так как позволяет работать всего лишь с 3 миллионами цветов.

---

← →
QuasiLamo ©   (2004-07-01 06:13) [4]

> [3] iZEN ©   (01.07.04 06:01)

посмотрел...не то...

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.019 c