保存图片为JPG/GIF格式
'--------------------------'程序作者:家新de粽子
'制作时间:2010-02-25
'--------------------------
'函数名:SaveImage
'输入参数:
'Pict(StdPicture):图象句柄
'FileName(String):保存路径
'PicType(String):保存类型
'Quality(Byte):JPG图象质量
'--------------------------
使用示例:
SaveImage Picture1.Picture , "C:\JiaXin.jpg" , ".jpg" , 80
SaveImage Picture1.Picture , "C:\JiaXin.gif" , ".gif"
很好用,谢谢了! 但是压率不是很好 感谢感谢,非常感谢,嘿嘿。。:lol
页:
[1]