找回密码
 注册
搜索
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
查看: 1397|回复: 3

[问题求助] [ 已解决 ] 求perl+Tk下动态播放gif的基本功能代码

[复制链接]
发表于 2025-12-3 14:37:56 | 显示全部楼层 |阅读模式
本帖最后由 zzz19760225 于 2025-12-3 15:11 编辑

只要能将gif原本的内容速度播放出来就可以了。
linux mint22.2
perl 5 (v5.38.2)
Tk version: 804.036
deepseep的各种回答越看越糊涂,除了显示静态gif,有一次有过一次简单代码可以播放GIF但是后来不断换代码,那个代码就再也找不到了,而且那个代码不是原样播放,是超速的播放。
如果perl本身内部模块无法实现(外模块多次安装不成功,不考虑),或者加上其他播放软件功能的路子。
跪求啊!
发表于 2025-12-3 14:56:48 | 显示全部楼层
  别呀,perl就用来处理琐碎事务挺好,想要做GUI,换一个吧  

评分

参与人数 1技术 +1 收起 理由
zzz19760225 + 1 哦!

查看全部评分

发表于 2025-12-3 15:39:22 | 显示全部楼层
本帖最后由 523066680 于 2025-12-3 15:52 编辑

猜测实现路径还是要找个 解析GIF图的模块,拆成一张张带透明参数的(RGBA)的图片(png?),然后循环呈现。至于帧率,Image::Info::GIF 也许能用。

其实Perl还有一个国内很冷门,中文资料为0的模块,Prima,我记得编译安装问题不大……  并且提供大量的示例。
但是,有些东西很烦就对了。

Prima也许可以直接播放GIF, webp
https://metacpan.org/pod/Prima::Image::Animate

评分

参与人数 1技术 +1 收起 理由
zzz19760225 + 1 安装完成,正在与deepseep问题打转中

查看全部评分

 楼主| 发表于 2025-12-3 17:57:05 | 显示全部楼层
还是先听从2楼的说法,考虑C语言SDL图形。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-16 20:01 , Processed in 0.020134 second(s), 9 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表