GDI+ 学习记录(31) 图像颜色变换(TGPImageAttributes)

//正常显示图片, 没有变换
var
  g:TGPGraphics;
  img:TGPImage;
begin
  g:=TGPGraphics.Create(Canvas.Handle);
  g.Clear(aclWhite);

  img:=TGPImage.Create('d:\mm.png');{测试文件要存在}
  g.DrawImage(img,10,10,img.GetWidth,img.GetHeight);

  img.Free;
  g.Free;
end;

//添加颜色变换
var
  g:TGPGraphics;
  img:TGPImage;
  imgattr:TGPImageAttributes;
const
  colormatrix:TColorMatrix = (
    (1.0,0.0,0.0,0.0,0.0),
    (0.0,1.0,0.0,0.0,0.0),
    (0.0,0.0,1.0,0.0,0.0),
    (0.0,0.0,0.0,1.0,0.0),
    (1.0,0.0,0.0,0.0,1.0));
begin
  g:=TGPGraphics.Create(Canvas.Handle);
  g.Clear(aclWhite);

  img:=TGPImage.Create('d:\mm.png');{测试文件要存在}
  imgattr:=TGPImageAttributes.Create;
  imgattr.SetColorMatrix(colormatrix,ColorMatrixFlagsDefault,ColorAdjustTypeDefault);

  g.DrawImage(img,MakeRect(10,10,img.GetWidth,img.GetHeight),
              10,10,img.GetWidth,img.GetHeight,UnitPixel,imgattr);
  imgattr.Free;
  img.Free;
  g.Free;
end;