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.