是jpg格式的吗?? 你可以用先从文件夹中把文件名取出来放到listbox中, 用imageenview控件加载图片 for i:=0 to listbox1.count-1 do begin imagenview.io.loadfromfile(listbox.item[i]) imageenview.proc. IMAGEENVIEW.Proc.Resample (x,y,TResampleFilter(5) ); imageenview.IO.Params.JPEG_Quality:=100; imageenview.io.savetofile(filename[i]); end;
用Canvas.StretchDraw将旧bmp画上去
分两步。
一。指定一个目录,遍历这个目录下的所有jpg文件。
(用FindFirst,FindNext)
二。找到一个文件后,就把此jpg文件转成bmp,同时改变大小。
(bmp.Canvas.StretchDraw),然后把bmp转成jpg,存盘。
http://search.csdn.net/Expert/topic/1385/1385095.xml?temp=.297909
你可以用先从文件夹中把文件名取出来放到listbox中,
用imageenview控件加载图片
for i:=0 to listbox1.count-1 do
begin
imagenview.io.loadfromfile(listbox.item[i])
imageenview.proc.
IMAGEENVIEW.Proc.Resample (x,y,TResampleFilter(5) );
imageenview.IO.Params.JPEG_Quality:=100;
imageenview.io.savetofile(filename[i]);
end;