Delphi TGIFImage：TImage显示gif动画

本文整理自网络，侵删。

 
Delphi TGIFImage：TImage显示gif动画
TImage显示gif动画速度设置
Image1:TImage;
Image1.Picture.LoadFromFile(OpenDialog1.FileName);
// AnimationSpeed 设定动画速度。其实就是原始速度的百分比，例如50就是说是原始速度的50%；
TGIFImage(Image1.Picture.Graphic).AnimationSpeed := 500;
TGIFImage(Image1.Picture.Graphic).Animate := True;
(AnimationSpeed = 0 to 1000)
如果设置AnimationSpeed = 0 则gif图像没有动画效果
 

相关阅读 >>

Delphi memo1 自定义位置插入

Delphi数据库实现从最后一条记录向上查询至首记录

Delphi xe5调用外部扫描程序――谷歌 zxing

Delphi操作unicode字符

Delphi xe8安卓下汉字转gb2312

Delphi获取开机时间代码

Delphi共享软件防破解的实用方法

Delphi图像hash算法，关于图像相似度问题

Delphi 10 seattle中使用本地通知，请使用tnotificationcenter组件

Delphi 网页数据抓取

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

转载请注明出处：木庄网络博客 » Delphi TGIFImage：TImage显示gif动画