昨天才知道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更快,只是我不会,你自己去改一下就成了

晕，我要保存的是缩略图！！！不是原图！！
我的程序现在保存的缩略图是250*250的，我实际大小约是250*200或200*250的

[此贴子已经被作者于2007-9-15 9:22:22编辑过]

我再想想看看

你这样做(是我以前做缩略图的方法,引用下),你不要直接传参数250,250了,算下原图的和宽比,把比例值存下来.用这个值转换到MAX_HEIGHT/WIDTH为250后的值,传这两个实际值试试,我也只是想法,一起试一下.

试过，好象不成

做出来了,加我QQ93803979,告诉你答案,呵呵

看来求人不如求已。
经过二天的探索，终于搞定了。
有兴趣的可以下载去看一下。
它可以快速生成缩略图，并保存。
接下来的目标：切割图片。

[此贴子已经被作者于2007-9-15 11:56:26编辑过]

我顶！！！

是VB，哭