webp转jpg

Minister 发表于 2022-10-24 15:10

本帖最后由 Minister 于 2022-10-24 20:30 编辑

效果图
https://attach.52pojie.cn//forum/202210/24/150607u00kzxs44559l00w.gif?l
.版本 2
.支持库 edroptarget
.支持库 spec

.程序集窗口程序集_启动窗口
.程序集变量 GP位图, GP位图

.子程序 __启动窗口_创建完毕
.局部变量 a, 文本型

拖放对象1.注册拖放控件 (取窗口句柄 ())
_启动窗口.总在最前＝选择 (选择框2.选中, 真, 假)

.子程序转换
.参数文件路径, 文本型
.局部变量参数_宽度, 整数型
.局部变量参数_高度, 整数型
.局部变量跨步, 整数型
.局部变量 BGRADataInt, 整数型
.局部变量位深, 整数型
.局部变量 WebPData, 字节集

Gdiplus初始化 ()
WebPData ＝读入文件 (文件路径)
BGRADataInt ＝ WebPDecodeBGRA (WebPData, 取字节集长度 (WebPData), 参数_宽度, 参数_高度)
位深＝ 32
跨步＝左移 (右移 (参数_宽度 × 位深＋ 31, 5), 2)
GP位图.创建自扫描行 (参数_宽度, 参数_高度, 跨步, #像素格式_32bppARGB, BGRADataInt)
写到文件 (文件路径＋ “.jpg”, GP位图.保存到字节集 (#图像格式_JPEG, ))
释放内存 (BGRADataInt)

.子程序 _拖放对象1_得到文件
.参数接收到的文件路径, 文本型
.局部变量分割, 文本型, , "0"
.局部变量 w, 整数型
.局部变量 i, 整数型

分割＝分割文本 (接收到的文件路径, #换行符, )
w ＝取数组成员数 (分割)
.计次循环首 (w, i)
.如果真 (到小写 (文件_取扩展名 (分割 )) ＝ “.webp”)
   转换 (分割 )
   .如果真 (选择框1.选中)
         删除文件 (分割 )
   .如果真结束

.如果真结束

.计次循环尾 ()

.子程序 __启动窗口_将被销毁

拖放对象1.撤消拖放控件 (取窗口句柄 ())

.子程序 _选择框2_被单击

_启动窗口.总在最前＝选择 (选择框2.选中, 真, 假)

转其他格式,请自己编译源码

坚持梦想 发表于 2022-10-24 16:13

风子是我发表于 2022-10-24 15:55
我都是直接加后缀.jpg，然后就能打开了

看破不说破还是好朋友

Minister 发表于 2022-10-24 20:24

ind 发表于 2022-10-24 16:17
webp动图转GIF的有没有？

呐格式可自己再更改{:1_905:}

Minister 发表于 2022-10-25 10:27

joexv 发表于 2022-10-24 15:22
能不能转成web .

用谷歌开源工具 cwebp.exe 1M左右命令行 cwebp input.png -lossless -m 6 -q 100 -o webp_lossless.webp 就可以比格式工厂啥的方便多了自己封装
链接https://developers.google.cn/speed/webp/gallery2

chenyiqq2008 发表于 2022-10-24 15:17

我都是用2345看图转的，没想到你这个软件这么神奇

mokson 发表于 2022-10-24 15:20

supernox 发表于 2022-10-24 15:20

点赞楼主！感谢分享

joexv 发表于 2022-10-24 15:22

能不能转成web .

winw2 发表于 2022-10-24 15:26

这个好，可以哦

petereda 发表于 2022-10-24 15:35

谢谢分享，收藏一下

Dream_Peng 发表于 2022-10-24 15:43

楼主有没有webm转通用视频播放的

风子是我 发表于 2022-10-24 15:55

我都是直接加后缀.jpg，然后就能打开了

页: [1] 2 3 4 5 6

吾爱破解 - 52pojie.cn's Archiver

webp转jpg