5,388
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
hejunyan 2000-09-07
- 打赏
- 举报
关注
flyby 2000-09-04
- 打赏
- 举报
上面的变量i应该为count;
:)
:)
flyby 2000-09-04
- 打赏
- 举报
不用其它控件，delphi不能调入gif动画。
但使用TImage也可以实现想gif动画的效果。
假设有n个图片img1.bmp、img2.bmp……imgn.bmp,
img:TImage;
Time:TTime;
procedure TForm.Timer1Timer(Sender: TObject);
begin
Count:=(Count mod n)+1;
ima.Picture.LoadFromFile('img'+i+'.bmp');
end;
很方便的，试一试！！！其实gif文件也是几幅图片的循环显示 :)
但使用TImage也可以实现想gif动画的效果。
假设有n个图片img1.bmp、img2.bmp……imgn.bmp,
img:TImage;
Time:TTime;
procedure TForm.Timer1Timer(Sender: TObject);
begin
Count:=(Count mod n)+1;
ima.Picture.LoadFromFile('img'+i+'.bmp');
end;
很方便的，试一试！！！其实gif文件也是几幅图片的循环显示 :)
zxghl 2000-08-26
- 打赏
- 举报
是啊。这类的免费控件很多。但是总感觉使用起来不舒服。
相信delphi6会有这个标准控件的。
另外，一个小窍门，你可以使用 TWebBrowser （控件名字记不清了）
这个控件封装了 IE(也可能支持NS)的功能调用，用它，你就可以轻松
显示 gif动画、html文档。。。
资源耗费太多？！嘻嘻，别怪我，怪M$去。
相信delphi6会有这个标准控件的。
另外，一个小窍门，你可以使用 TWebBrowser （控件名字记不清了）
这个控件封装了 IE(也可能支持NS)的功能调用，用它，你就可以轻松
显示 gif动画、html文档。。。
资源耗费太多？！嘻嘻，别怪我，怪M$去。
yubo 2000-08-26
- 打赏
- 举报
用其他控件程序员大本营上有
jintao 2000-08-26
- 打赏
- 举报
关注
