Ergebnis der Suchanfrage

• Forum: Multimedia

  Re: Jpg, Vorschau, TImage, Kompressionsrate

    Delphi
    by isilive, 2. Nov 2008
  Mit 'jpg.smoothing' funktioniert es. Danke!!!! Wer kann aber auch ahnen, dass compress alleine noch zuwenig ist. :stupid:
  
  Die andere Möglichkeit:
  
  jpg2.Savetostream(stream1);
  Stream1.Position := 0;
  jpg2.LoadFromStream(stream1);
  
  funktionierte mit der normalen 'uses: Jpeg' nicht. 'JPG-Fehler #43' trotz '.Position:=0'.
  Erst als ich die GraphicEx eingebunden habe funktionierte es,...
• Forum: Multimedia

  Re: Jpg, Vorschau, TImage, Kompressionsrate

    Delphi
    by isilive, 1. Nov 2008
  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:
  
  
  var: stream1:tmemorystream;
  begin
  jpg2.Savetostream(stream1);
• Forum: Multimedia

  Jpg, Vorschau, TImage, Kompressionsrate

    Delphi
    by isilive, 31. Okt 2008
  Hallo Leute,
  
  ich wandle ein bmp in ein jpg um:
  
  jpg2.CompressionQuality:=quali;
  jpg2.assign(bmp2);
  
  Wenn ich jetzt bei 'jpg2' eine sehr schlechte/kleine Compression Quality einstelle, wird es erwartungsgemäss eine sehr kleine Datei mit schlechter Bildqualität wenn ich es auf die Platte speichere.
  
  Später male das JPG in ein TImage: