在Excel中用 YFGif控件播放 gif 动画···2014-12-21 修复Bub

coby001 · 发表于 2014-12-20 11:01

renahu 发表于 2014-12-20 10:43
设置成1000，速度还是比网页上的快，不知道源代码中是不是还可以加大上限

gif中的时间并不是精准的，
各种播放器都有些误差~
影响不太大就成

这个控件用的vb定时器 Timer，本身就不太精准，效果自然会低些~~

你可以自己用另外的高精度定时器来改良啊~~

不过，Gif嘛，看看而已~ 够用就成~

renahu · 发表于 2014-12-20 11:21

renahu 发表于 2014-12-20 10:43
设置成1000，速度还是比网页上的快，不知道源代码中是不是还可以加大上限

又找了几张图试了试，全是快，闪得眼晕

coby001 · 发表于 2014-12-20 11:22

renahu 发表于 2014-12-20 11:21
又找了几张图试了试，全是快，闪得眼晕

发上来看看

renahu · 发表于 2014-12-20 11:23

不过也有速度和网上一样的，看来和gif文件有关

renahu · 发表于 2014-12-20 11:28

本帖最后由 renahu 于 2014-12-20 11:31 编辑

coby001 发表于 2014-12-20 11:22
发上来看看

这个控件的优点是，从模块中创建控件和加载gif没问题
闪图：

祈福3.rar (252.95 KB, 下载次数: 31) 没设置延时，超快

我还是觉得那个注册版的 anigif 播放图片效果最好，和实际一样，也不用设置参数，现在就是加载gif的问题，我始终纳闷，为什么非要打开关闭“设计模式”才能加载上gif

coby001 · 发表于 2014-12-20 11:46

renahu 发表于 2014-12-20 11:28
这个控件的优点是，从模块中创建控件和加载gif没问题
闪图：没设置延时，超快

oGIF.GifPlay ThisWorkbook.Path & "\祈福3.gif", , , 350

这样就可以了~

renahu · 发表于 2014-12-20 11:58

coby001 发表于 2014-12-20 11:46
oGIF.GifPlay ThisWorkbook.Path & "\祈福3.gif", , , 350

这样就可以了~

这有个问题，如果一张两张固定图，好办，我事先建好控件都行，如果是随时更新图片名称或网址，然后新建立控件进行播放，这个速率还要调就麻烦了

VBA万岁 · 发表于 2014-12-20 14:56

Mark一下，有空再测试。

coby001 · 发表于 2014-12-20 16:46

ha_GIFMovieGear.rar (331.15 KB, 下载次数: 283)
绿色汉化版_GIF动画制作软件
编辑gif的软件

coby001 · 发表于 2014-12-21 00:56

2014-12-21 修复延迟错误的 Bub
请重新下载

		自动登录	找回密码
密码			免费注册

[分享] 在Excel中用 YFGif控件 播放 gif 动画···2014-12-21 修复Bub