Как получить R,G,B из clBtnFace?

← →
ancara © (2004-06-11 10:49) [0]

Доброго времени суток, господа! Поскажите пожалуйста как из clBtnFace и ему подобных вытащить R, G и B значения. Посмотрел в Graphics.pas, там
COLOR_BTNFACE = 15;
и
clBtnFace = (COLOR_BTNFACE or $80000000);
Я так понимаю, 15 это индекс в сист. палитре, да? А как мне из этой палитры RGB получить?

← →
YurikGL © (2004-06-11 10:55) [1]

GetRValue
GetBValue
GerGValue

← →
ancara © (2004-06-11 11:02) [2]

> YurikGL © (11.06.04 10:55) [1]
> GetRValue

Windows.pas: function GetRValue(rgb: DWORD): Byte; begin Result := Byte(rgb); end;

В качестве параметра rgb мы передаем clBtnFace, а он равен $8000000F, что получаем на выходе?

← →
Gero © (2004-06-11 11:04) [3]

Color := ColorToRGB(clBtnFace);
R := GetRValue;
G := GetGValue;
B := GetBValue;

Считайте сами.

← →
ancara © (2004-06-11 11:15) [4]

> Gero © (11.06.04 11:04) [3]
> Color := ColorToRGB(clBtnFace);

Так вот оно в чем дело! Все, арбайтет! Спасибо!

← →
Anatoly Podgoretsky © (2004-06-11 11:39) [5]

ancara © (11.06.04 11:15) [4]
Да в этом, TColor это не RGB, а гораддо комплекснее.

Не только, кроме этого первые три байта могут сожержать далеко не RGB

Как получить R,G,B из clBtnFace? Найти похожие ветки