bgrabitmap reduce quality

[xinyiman]

Hi guys, I have a question. How can I reduce the quality of an image? I am looking for something similar to

TJPEGImage.CompressionQuality

But for bgrabitmap

[winni]

Hi!

JP(E)G  is a lossy file format.
BGRA is a format to store, convert an show images.

You can save a BGRAbitmap with low quality/high compression as a JPG, but who wants that?

Winni

[lainz]

In LazPaint is used this:

Code: Pascal  [Select][+][-]

1. FJpegStream := TMemoryStream.Create;
2.     writer := TFPWriterJPEG.Create;
3.     writer.CompressionQuality := JpegQuality;
4.     FFlattenedOriginal.SaveToStream(FJpegStream, writer);
5.     writer.Free;

FFlattenedOriginal is a TBGRABitmap.

uses
  fpwritejpeg;

[circular]

Indeed you need to pass the image writer as a parameter to specify the desired format options. Works as will with SaveToFile.