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

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

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

void __fastcall TForm1::Button1Click(TObject *Sender)
{
  BYTE nRed   = GetRValue(Color);
  BYTE nBlue  = GetBValue(Color);
  BYTE nGreen = GetGValue(Color);
 
  nRed +=10;
  nBlue -=10;
  nGreen *= 1.05;
  Color =(TColor) RGB(nRed, nGreen, nBlue);
 }

注意：Get系列函数返回一个0~255的亮度值。因为单个亮度值为一个字节所以返回类型为BYTE。当你把亮度值设为小于0或大于255时，RGB宏将截去多余的字节(它只取低8位) 。

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