delphi中怎么显示PNG图像

usespngimage; var Png:TPngObject; begin Png:=TPngObject.Create; try Png.LoadFromFile('test.png'); image1.Picture.Assign(Png); finally Png.Free; end; end;