Einzelnen Beitrag anzeigen

Benutzerbild von isilive
isilive

Registriert seit: 15. Okt 2008
Ort: Österreich
192 Beiträge
 
Delphi 2009 Professional
 
#4

Re: Jpg, Vorschau, TImage, Kompressionsrate

  Alt 1. Nov 2008, 03:50
Zitat von littleDave:
Delphi-Quellcode:
jpg2.CompressionQuality:=quali;
jpg2.assign(bmp2);
jpg2.Compress;
Funzt leider auch nicht. Hab die quali definitiv <10 und das Bild ist nach 'compress' und
form2.ImageBild.Canvas.StretchDraw(Rect(0,0,Breite2,Hoehe2),jpg2); immer noch in bester Qualität.

Dann hab ich versucht es in einen Memorystream zu speichern und danach wieder zu laden:

Delphi-Quellcode:
var: stream1:tmemorystream;
begin
  jpg2.Savetostream(stream1);
  jpg2.LoadFromStream(stream1);
das Speichern funktioniert problemlos aber das Laden bringt mir immer:
'Im Projekt ist eine Exception der Klasse EJPEG mit der Meldung JPEG-Fehler #43 aufgetreten.'

Ist es mit einem Stream möglich? Wie kann ich es sonst lösen?
Stefan
Jedoch kann die referenzbasierte Implementierung des Standard-Objektmodells in Kombination mit den komplexen syntaktischen Dereferenzierungsregeln bei einer objektorientierten API wie ein Stolperstein wirken.
  Mit Zitat antworten Zitat