delphi 怎么求取图像上每个象素的颜色值！
跪求：用delphi怎么求出图像上每个象素点的灰度值，以及这些灰度值怎么产生一个矩阵。
再问一个问题就是：我想将这幅图像变成一个个小区域，然后再产生灰度值矩阵呢，我该怎么做呢？要是的可以的话能给个源代码，或者讲讲思路也行！谢谢！

[解决办法]
从TCanvas.Pixels[x,y]中读到单个像素的TColor

然后用GetRValue得到R值,GetGValue得到G值,GetBValue得到B值.