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

韩冰

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

6 }; Y& n! y8 G

void __fastcall TForm1::Button1Click(TObject *Sender) { BYTE nRed = GetRValue(Color); ) n/ M" W. r8 T: S: A BYTE nBlue = GetBValue(Color); ! X6 }* |# n, Y: f' J( | BYTE nGreen = GetGValue(Color); ! H5 Q2 U$ q9 H. g k$ F. i Y- G% M Y. N0 s) K7 o n4 d4 g+ c nRed +=10; 9 E5 d: g( t, s5 U: P nBlue -=10; ( @$ r ~/ T$ I2 s; n0 A nGreen *= 1.05; ; f d" ]7 W/ ]9 n, i( P Color =(TColor) RGB(nRed, nGreen, nBlue); } ! `% a9 X H; ^0 N ]# l2 R; O注意：Get系列函数返回一个0~255的亮度值。因为单个亮度值为一个字节所以返回类型为BYTE。当你把亮度值设为小于0或大于255时，RGB宏将截去多余的字节(它只取低8位) 。

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