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

韩冰

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

void __fastcall TForm1::Button1Click(TObject *Sender) " M: B% p: Z& u8 H3 D8 C{ BYTE nRed = GetRValue(Color); - I5 e# S& r& N7 t( V BYTE nBlue = GetBValue(Color); 1 _% Z6 Z; Q% |: _" x BYTE nGreen = GetGValue(Color); . u1 e6 N' F' k( ~, `% |, g ' F5 H5 K4 w; f nRed +=10; nBlue -=10; % b. A3 O2 K; p9 y: A0 `& u nGreen *= 1.05; Color =(TColor) RGB(nRed, nGreen, nBlue); } 注意：Get系列函数返回一个0~255的亮度值。因为单个亮度值为一个字节所以返回类型为BYTE。当你把亮度值设为小于0或大于255时，RGB宏将截去多余的字节(它只取低8位) 。

8 O% t" H5 d$ p( q" T- N

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