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中coinitialize作用

Delphi 建立快捷方式的函数: createshortcut

Delphi:窗体的扩展样式gwl_exstyle用于setwindowlong

Delphi 万年历 程序源码下部分(包括:农历计算、24节气、星期计算、属相)

Delphi 如何从url提取文件名?

crc16unt.pas

Delphi superobject json操作类的基本用法

Delphi date 返回当前的日期

firemonkey下使用stylebook的一些经验

Delphi 获取网页代码单元

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



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...

    正在狠努力加载,请稍候...