得到像素的R、G、B值

在窗体 上加载一图片，并在图片的点击事件中MouseDown(其它的也可）写如下代码：

C#：

 private void pictureBox1_MouseDown(object sender, MouseEventArgs e)
        {
            Bitmap b =(Bitmap) pictureBox1.Image;
            Color cc=  b.GetPixel(e.X, e.Y);
            textBox1.Text = cc.R.ToString();
            textBox2.Text = cc.G.ToString();
            textBox3.Text = cc.B.ToString();

        }

Delphi:

procedure TForm1.Image1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
var
  color:TColor;
begin
  color:=GetPixel(self.Canvas.Handle,x,y);
  Edit1.Text:=IntToStr(GetRValue(color));
  Edit2.Text:=IntToStr(GetGValue(color));
  Edit3.Text:=IntToStr(GetBValue(color));
end;