请问一下，BMP转jpg函数怎么写？

xzrmail · 发表于 2009-12-12 03:10:42

注：不是jpg转BMP,是BMP转jpg,

顽固不化 · 发表于 2009-12-12 10:51:25

#include <GDIPlus.au3>
;==========================
;   根据三恨函数修改
;    by 顽固不化  20091212
;==========================
_BMP2JPG("c:\01\00.bmp", "c:\01\00.jpg")

Func _BMP2JPG($bmp, $jpg)  ;函数（输入，输出）
        Local $hImage, $CLSID
        _GDIPlus_Startup()
        $hImage = _GDIPlus_ImageLoadFromFile($bmp)
        $CLSID = _GDIPlus_EncodersGetCLSID("JPG")
        _GDIPlus_ImageSaveToFileEx($hImage, $jpg, $CLSID)
        _GDIPlus_Shutdown()
EndFunc   ;==>_BMP2JPG

wwant · 发表于 2009-12-12 10:59:44

我喜欢直接看到代码..

xzrmail · 发表于 2009-12-12 11:47:42

回复 2# 顽固不化
谢谢你喽！

wyl0205 · 发表于 2009-12-12 13:09:13

又学习了，做个记号。。。

		自动登录	找回密码
密码			加入

请问一下，BMP转jpg函数怎么写？

相关帖子

浏览过的版块