如何得到的一个色彩值的R，G，B值

Question

用 GetPixel 可以得到一点的色彩值，
我想分别得到他的R，G，B值，如何做？================================================================CSDN 论坛助手 Ver 1.0 B0402提供下载。 改进了很多，功能完备！★  浏览帖子速度极快！[建议系统使用ie5.5以上]。 ★  多种帖子实现界面。 
★  保存帖子到本地[html格式]★  监视您关注帖子的回复更新。
★  可以直接发贴、回复帖子★  采用XML接口，可以一次性显示4页帖子,同时支持自定义每次显示帖子数量。可以浏览历史记录！ 
★  支持在线检测程序升级情况，可及时获得程序更新的信息。★★ 签名  ●  
     可以在您的每个帖子的后面自动加上一个自己设计的签名哟。Http://www.ChinaOK.net/csdn/csdn.zip
Http://www.ChinaOK.net/csdn/csdn.rar
Http://www.ChinaOK.net/csdn/csdn.exe    [自解压]

Answer 1

TColor是$FF FF FF形式的3个byte组成的
用mod div 分别取出即可。
red=color div $10000
green=color mod $1000 div $100
blue=color mod $100

Answer 2

现成的函数,何必呢?GetRValue()
GetBValue()
GetYValue()

Answer 3

哦,写错
应该是GetRValue()
GetBValue()
GetGValue()
GetYValue()取的不是rgb

Answer 4

R := Color and $ff;
G := (Color and $ff00) shr 8;
B := (Color and $ff0000) shr 16;

Answer 5

GetRValue()
GetBValue()
GetGValue()

Answer 6

或者用移位指令shr or shl