是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;