Question

有一张png格式的图片，在delphi中如何把该图片分成三份显示？

Answer 1

使用pngimage控件加载一张图片
var
png: TPNGObject;
bmp: Tbitmap;
begin
png := TPNGObject.Create();
// 加载一张png图片
png.LoadFromFile(‘a.png');
// 在timage中显示
Image1.Picture.Bitmap.Assign(png);
bmp := Image1.Picture.Bitmap;
// 使用cbmp.Canvas.CopyRect(rec1, bmp.Canvas, rec2); 方法，拷贝一块区域到新的bmp对象中
end;

Answer 2

你用什么组件来显示？

追问

用image

追答

TImage 不支持 PNG 格式的图片

追问

delphi2010中可以。。或者使用pngimage控件,如果不在Timage中显示该怎么做嘛？？

Answer 3

如果要实现这个，可以用d2007以后的版本，或者自己用gid+写。

追问

具体怎么做呢？？能否详细点

Answer 4

如果要实现这个，可以用d2007以后的版本，或者自己用gid+写。

追问

具体怎么做呢？？能否详细点