delphi – 如何创建PNG资源?

前端之家收集整理的这篇文章主要介绍了delphi – 如何创建PNG资源?前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
我有一个有一个大的TImage的表格作为背景。问题是,这是直接存储在DFM作为位图,它占用大约3 MB。原始的PNG文件是〜250K。我想尝试通过在资源中嵌入PNG来减少膨胀,然后在OnCreate期间加载它。我现在可以这样做,Delphi 2009包括PNG支持,除了我不知道如何构建一个PNG的资源文件。任何人都知道如何做?

解决方法

示例文本文件(名为myres.rc):
MYPNG RCDATA mypng.png

添加到项目:

{$R 'myres.res' 'myres.rc'}

在运行时加载的示例:

uses
  PngImage;

var
  Png: TPngImage;
begin
  Png := TPngImage.Create;
  try
    Png.LoadFromResourceName(HInstance,'MYPNG');
    Image1.Picture.Graphic := Png; // Image1: TImage on the form
  finally
    Png.Free;
  end;
end;
原文链接:https://www.f2er.com/delphi/103680.html

猜你在找的Delphi相关文章