Fotos in einer DB komprimieren

[shmia]

Grundsätzlich kann man JPEG-Daten nicht mit einem weiterem Komprimierungsverfahren (LZH, ...) verkleinern.
Man muss schon weitere Verluste in der Bildqualität in Kauf nehmen, damit die Datenmenge kleiner wird.

Also:

Delphi-Quellcode:

MyJpeg.LoadFromStream(BlobStream);
MyJpeg.CompressionQuality := 10; // 100%=beste Qualität  1%=schlechteste Qualität/kleinste Datenmenge
MyJpeg.Compress;  // neu komprimieren
MyJPeg.SaveToStream(BlobStream);