昨天才知道GDI是什么东西的,看了下你代码,保存时调用的是SveJPG(Picture1.Image,"D;\12\" + File2.filename,80)
你看下SaveJPG函数原型就明白了,它存的对象就是Picture1的Image而不是你期望中的原文件.
你可以这样改一下(只针对你的程序):SaveJPG(LoadPicture(dir1.Path & "\" & File2.filename),"D:\12\" + File2.filename,80),这样存下来的和原图大小一致.
当然,在GDI中有更好的方法得到图片文件的句柄,比LoadPicture更快,只是我不会,你自己去改一下就成了
你看下SaveJPG函数原型就明白了,它存的对象就是Picture1的Image而不是你期望中的原文件.
你可以这样改一下(只针对你的程序):SaveJPG(LoadPicture(dir1.Path & "\" & File2.filename),"D:\12\" + File2.filename,80),这样存下来的和原图大小一致.
当然,在GDI中有更好的方法得到图片文件的句柄,比LoadPicture更快,只是我不会,你自己去改一下就成了
其实我也很无聊!