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

Как перевести TColor в RGB   Найти похожие ветки 

← →
TStas ©   (2005-12-17 16:48) [0]

Как-то просто, а найти не могу.

---

← →
begin...end ©   (2005-12-17 16:50) [1]

Функция ColorToRGB (модуль Graphics).

---

← →
TStas ©   (2005-12-17 16:52) [2]

Спасибо, сейчас попробую

---

← →
Fenik ©   (2005-12-17 21:25) [3]

R := Lo(Color); {красный}
G := Lo(Color shr 8); {зелёный}
B := Lo((Color shr 8) shr 8); {синий}

---

← →
app ©   (2005-12-17 22:21) [4]

Fenik ©   (17.12.05 21:25) [3]
Во первых сложно, а во вторых неправильно. См. справка что такое TColor

---

← →
Fenik ©   (2005-12-17 22:45) [5]

> app ©  (17.12.05 22:21) [4]

Во-первых быстро, во-вторых правильно, если цвет не системный или перед этим использован совет [1], т.е. Color := ColorToRGB(Color). Справку я читал. В-третьих, про дефисы я не забываю :))

---

← →
Fenik ©   (2005-12-17 22:48) [6]

> app ©

Мы, видимо, разные вещи под RGB понимаем.

---

← →
Anatoly Podgoretsky ©   (2005-12-17 23:08) [7]

Fenik ©   (17.12.05 22:45) [5]
Я понимаю TColor как он есть, а он по определению не являеся RGB, иногда может с ним совпадать, если не обращать внимание на 4 байт

---

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

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



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