Hi Joseph
Here is an example:
// Show a preview and compressed size for a JPEG
ienSource.IO.Params.JPEG_QUALITY := JPEGQuality;
ienSource.IO.Params.JPEG_COLORSPACE := JPEGPhotometric;
ienSource.IO.Params.JPEG_DCTMETHOD := JPEGDCTMethod;
ienSource.IO.Params.JPEG_OPTIMALHUFFMAN := JPEGOptimalHuffman;
ienSource.IO.Params.JPEG_SMOOTH := JPEGSmooth;
ienSource.IO.Params.JPEG_PROGRESSIVE := JPEGProgressive;
ienSource.IO.SaveToStreamJpeg(mf);
mf.position := 0;
ienPreview.IO.LoadFromStreamJpeg(mf);
lblSaveSize.caption := IEBytesToStr2( mf.size );
Nigel
Xequte Software
www.imageen.com