从TColor对象中解析出红、绿、蓝的亮度

韩冰

使用API函数GetRValue,GetBValue及GetGValue。这里有一个以析取红绿蓝来改变窗口背景色的例子。(注意：在使用下面的例子代码前，请将窗口的Color设为clBlue,clNavy或其它任何一种非系统颜色，诸如clBtnFace)

void __fastcall TForm1::Button1Click(TObject *Sender) { BYTE nRed = GetRValue(Color); 2 h" c5 ~% _' r+ r, K* t* t BYTE nBlue = GetBValue(Color); BYTE nGreen = GetGValue(Color); 9 A0 n$ k/ ^1 C: j" G * y: @% s( Y$ [ J4 R1 F8 E+ k nRed +=10; nBlue -=10; nGreen *= 1.05; ) r4 M- `/ f( Y8 a# d; R Color =(TColor) RGB(nRed, nGreen, nBlue); 6 ]/ g% h" g$ e' ~) e, W } 注意：Get系列函数返回一个0~255的亮度值。因为单个亮度值为一个字节所以返回类型为BYTE。当你把亮度值设为小于0或大于255时，RGB宏将截去多余的字节(它只取低8位) 。

1 u' V9 R& E/ s1 S

注意：从技术上讲，这三个Get函数实际上不是函数，它们是C风格的宏。你可以在Include\Win32\wingdi.h中看到它们的实现。使用宏的一个结果是：函数不是类型安全的。你可以将char *传给宏而不会得到任何警告。