如何获得一幅图象中引用的颜色索引值并可以改变它们？

Question

比如一幅256色图，怎样得到它使用的颜色索引及其色分量并可以改变它们？
这样的话就可以对该图片进行颜色上的特殊处理，从而产生动态或其它自定义的效果了。

Answer 1

是不是这样，找出其三原色：
procedure TForm1.Image1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
  self.Color := Image1.Canvas.Pixels[X, Y];
  {红色值，绿用R蓝用B，合成用RGB()函数}
  Edit1.Text := IntToStr(GetRValue(Image1.Canvas.Pixels[X, Y]));  
end;

Answer 2

想实现如PHOTOSHOP中一样可以调一幅图象颜色或明暗度一样