DELPHI - Delphi 2007 已内部支持 GIF 动画了
======================================================注:本文源代码点此下载======================================================delphi - delphi 2007 已内部支持 gif 动画了delphi - delphi 2007 已内部支持 gif 动画了
======================================================
注:本文源代码点此下载
======================================================
delphi - delphi 2007 已内部支持 gif 动画了
delphi - delphi 2007 已内部支持 gif 动画了
以前要在 delphi 中显示 gif 动画,一种办法是使用第三方组件,别一种方法就是使用 webbrowser 组件。在 delphi 2007 中,其内部已支持 gif 了(可能在 delphi 2005 和 delphi 2006 中已支持了,未确认)。
关于 gif 的相关类是 tgifimage,在 gifimg 单元中,看下面的代码,窗体中的 gif 就动起来了:
1 uses gifimg;
2 procedure tform1.formcreate(sender: tobject);
3 begin
4// 先在窗体上放一个 timage 组件:image1;
5image1.picture.loadfromfile('c:\example.gif');
6// animationspeed 设定动画速度,值越大,速度越快;
7tgifimage(image1.picture.graphic).animationspeed := 500;
8tgifimage(image1.picture.graphic).animate := true;
9 end;
10
绿色通道:好文要顶关注我收藏该文与我联系
posted on 2008-08-13 09:35 ntire 阅读(72) 评论(0)编辑 收藏
注册用户登录后才能发表评论,请 登录 或 注册,返回博客园首页。
最新it新闻:
·ios 5.1 beta3文件预示未来 siri有可能支持 ipad和 ipod touch
·android平台12月广告浏览份额51.6% 超越ios
» 更多新闻...
最新知识库文章:
======================================================
在最后,我邀请大家参加新浪APP,就是新浪免费送大家的一个空间,支持PHP+MySql,免费二级域名,免费域名绑定 这个是我邀请的地址,您通过这个链接注册即为我的好友,并获赠云豆500个,价值5元哦!短网址是http://t.cn/SXOiLh我创建的小站每天访客已经达到2000+了,每天挂广告赚50+元哦,呵呵,饭钱不愁了,\(^o^)/
![Logo](https://devpress.csdnimg.cn/79de2bf0b7994defa4242ef90d5513fa.jpg)
开放原子开发者工作坊旨在鼓励更多人参与开源活动,与志同道合的开发者们相互交流开发经验、分享开发心得、获取前沿技术趋势。工作坊有多种形式的开发者活动,如meetup、训练营等,主打技术交流,干货满满,真诚地邀请各位开发者共同参与!
更多推荐
所有评论(0)