Delphi VCL GIF 动画

本文整理自网络，侵删。

 
Delphi XE10 的 VCL 已经内置支持 GIF，不需要第三方控件。

uses Vcl.Imaging.GIFImg
procedure TForm2.Button1Click(Sender: TObject);
begin
  Image1.Picture.LoadFromFile('E:\tt\abc.gif');
  TGIFImage(Image1.Picture.Graphic).Animate := True;  //加上这句话，图就能动。
end;

――――――――――――――――

原文链接：https://blog.csdn.net/pcplayer/article/details/69666574
 

相关阅读 >>

Delphi winapi: getclassname - 获取指定窗口的类名

Delphi中使用directx截屏函数

Delphi cxdbtreelist：最简单的节点图标添加方法

Delphi firemonkey的stylebook皮肤控件的使用

idhttp获取文件大小的代码

Delphi 通过u盘方式加密

Delphi查找特定的exe是否在运行

Delphi superobject 序列数据集

Delphi 匿名管道

Delphi 圆角panel

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi VCL GIF 动画