zoukankan      html  css  js  c++  java
  • 使用 png 图片 回复 "heyongan" 的问题

    Delphi 2009 有了pngimage、GIFImg 单元, 可以直接使用 png 和 gif 图片了;

    如果是设计时给 TImage 装载 png 图片, Delphi 会自动调用 pngimage 单元完成加载, 那动态调用呢?

    当然首先要uses pngimage, 然后:
    unit Unit1;
    
    interface
    
    uses
      Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
      Dialogs, ExtCtrls, pngimage;
    
    type
      TForm1 = class(TForm)
        Image1: TImage;
        procedure FormCreate(Sender: TObject);
      end;
    
    var
      Form1: TForm1;
    
    implementation
    
    {$R *.dfm}
    
    procedure TForm1.FormCreate(Sender: TObject);
    var
      PngBit: TPngImage;
    begin
      PngBit := TPngImage.Create;
      PngBit.LoadFromFile('c:\temp\test.png');
      Image1.Picture.Graphic := PngBit;
      PngBit.Free;
    end;
    
    end.
    
  • 相关阅读:
    Tensor总结
    Tensorflow池化
    conda操作
    KS值计算
    supervisor实践
    npm/yarn实践
    nni 环境搭建
    阿里云个人邮箱配置
    Jinja2宏使用
    利用VS code 远程调试 docker 中的 dotnet 应用
  • 原文地址:https://www.cnblogs.com/del/p/1316584.html
Copyright © 2011-2022 走看看