使用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 *传给宏而不会得到任何警告。