安装控件： 
delphi7默认是打不开png格式图片的，需要安装TPNGImage v1.5控件，该控件可到http://www.2ccc.com/article.asp?articleid=3059下载
安装控件也很简单，只要解压引入其路径即可， 工具--环境选项--库路径，在这里添加解决的路径 C:\Program Files (x86)\Borland\Delphi7\myvcl\pngimage15

注：控件pngimage15里的CHM的说明文件，里面有例子和安装说明，但要在win7下才能打开，win10下也可右击--属性--勾上解除锁定，否则打开会空白

调用方法：
uses pngimage;
procedure TForm1.FormCreate(Sender: TObject);
var
  png: Tpngobject;  //注1：这里容易出错，网上的代码都是TPngImage，实际上这里是Tpngobject，一直卡在这里，后来查控件目录的chm文件中的例子才找到
begin
  png := TPngobject.Create(); //注1：这里容易出错，网上的代码都是TPngImage.Create(),包括ChatGPT
  try
    png.LoadFromFile('1.png'); //裁入当前目录下的1.png文件
    image1.Picture.Assign(png);
    Image1.stretch := true;
  finally
    png.Free;
  end;
end;