The ZoomFilter property specifies the filter to apply in zoom-in (Zoom property) operations. The fastest way to zoom a picture is to set ZoomFilter to rfNone (default). In your case AutoFit is a form of zoom so set the ZoomFilter before loading the image.
If rfHermite givess you the best result as shown in your code then call ImageEn1.ZoomFilter := rfHermite:
procedure TForm14.FormCreate(Sender: TObject);
begin
ImageEn1.ZoomFilter := rfHermite;
ImageEn2.ZoomFilter := rfHermite:
ResampleStreamToStream();
ImageEn1.IO.LoadFromFileJpeg();
ImageEn2.IO.LoadFromFileJpeg();
end;
William Miller
Email: w2m@frontiernet.net
EBook: http://www.imageen.com/ebook/
Apprehend: http://www.frontiernet.net/~w2m/index.html
Search
Resample vs LoadFromFile & AutoFit
Posted - Jan 02 2013 : 05:02:29
