使用方法:(Delphi 7 使用成功案例)
1、将本包中所有文件复制到开发文件保存的目录中
2、在USES单元中加入pngimage
3、窗体中插入image1控件
4、在调用位置,加入如下代码就OK啦!
var
png: tpngimage;
begin
png := tpngimage.Create;
png.LoadFromFile(getcurrentdir() + '\pic.png');
Image1.Picture.Bitmap.Assign(png);
png.Free;
end;
1