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取得文件图标并在tlistview中显示

download 和 http downloader 源码

Delphi 数据异或校验

Delphi 读取文本文件的最后一行

orangeui作者开源作品

Delphi xe5中以andorid 启动应用程序

Delphi url 中文编解码

Delphi windows xp下屏蔽ctrl_alt_del键的方法

Delphi 执行程序并等待完成2

Delphi中判断是否是64位操作系统

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

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