JPEG Qualität beim Speichern reduzieren

[AndreasSt]

Hallo,
Ich versuche ein JPEG mit reduzierter Qualität zu speichern (FMX).
Ausgangspunkt ist ein TBitmap.
Die Funktion saveTofile kann ja einen zweiten Parameter mit PBitmapCodecSaveParams erhalten.
Aber egal was ich versuche, die app stürzt unter android ab.

Variante1:

Code:

var
  Image:TBitmap;
  saveParams:tBitmapcodecSaveParams;

...
  saveParams.Quality:=50;
  Image.SaveToFile('filename.jpg,@saveParams);

Variante2:

Code:

var
  Image:TBitmap;
  Surf:TBitmapSurface;
  saveParams:tBitmapcodecSaveParams;

...
  Surf := TBitmapSurface.Create;
  Surf.assign(Image);
  saveParams.Quality:=50;
  TBitmapCodecManager.SaveToFile(sFileName,Surf,@saveParams);

Hat jemand so etwas schon einmal realisiert?

[AndreasSt]

Es lag ein Fehler bei der Angabe des Speicherortes vor.
Ich habe beide Varianten daher nochmals getestet.
Die Variante 1 funktioniert definitiv.