Ergebnis der Suchanfrage

• Forum: Multimedia

  AW: JPEG CompressionQuality ermitteln

    Delphi
    by Schwedenbitter, 26. Okt 2017
  Danke Euch allen für die tatkräftige Hilfe!
  
  Genau die meine ich. Und wenn ich Deinen Code richtig deute, gibt es entsprechendes also weder in Winapi.GDIPAPI, Winapi.GDIPOBJ noch Winapi.GDIPUTIL?
  
  Ich habe das jetzt mal umgestellt und es klappt (jedenfalls bei mir) tatsächlich:Function CalcCompressionQuality(Const Image: GPIMAGE;
  Const MustFit: Boolean = False): TJPEGQualityRange;
  Var...
• Forum: Multimedia

  AW: JPEG CompressionQuality ermitteln

    Delphi
    by Schwedenbitter, 26. Okt 2017
  Die hatte ich schon entdeckt. Mir fehlen im Grunde "nur" 3 Dinge:
  
  Wie speichert man das Originalbild in einen Stream, ohne neu zu komprimieren (zur Ermittlung der Ausgangsgröße)?
  Wie setzt man die Kompressionsrate? Das hat EWeiss schon sehr schön gezeigt. Auch wenn das recht kompliziert aussieht. Danke dafür!
  Wie speichert man die Datei dieses Mal neu komprimiert testweise in einen Stream...
• Forum: Multimedia

  AW: JPEG CompressionQuality ermitteln

    Delphi
    by Schwedenbitter, 25. Okt 2017
  Dem ist nichts hinzuzufügen.
  CompressionQuality ist nicht irgend ein Wert, sondern gemeint ist der von Vcl.Imaging.jpeg.TJPEGImage.CompressionQuality, was dem geneigten Leser aber klar wird. Und da ich das Thema nicht erstellt habe, kann ich dessen Titel nicht beeinflussen.
  Bedeutet 100 wirklich, dass es ohne Verlust komprimiert wird? Ich denke, dass zumindest die JPEG-Version von Delphi immer...
• Forum: Multimedia

  AW: JPEG CompressionQuality ermitteln

    Delphi
    by Schwedenbitter, 25. Okt 2017
  Danke. Ich glaube, mensch72 und ich reden aneinander vorbei.
  Mich interessiert nicht die Kompressionsrate der Datei(größe).
• Forum: Multimedia

  AW: JPEG CompressionQuality ermitteln

    Delphi
    by Schwedenbitter, 25. Okt 2017
  Gibt es dazu eine Quelle?
  Und ist gleichbedeutend mit CompressionQuality?
  
  
  Wofür stehen die ? Also einfach 1 und damit die Dateigröße?
• Forum: Multimedia

  AW: JPEG CompressionQuality ermitteln

    Delphi
    by Schwedenbitter, 25. Okt 2017
  Ich habe das - etwas unorthodox - für mich selbst jetzt so gelöst:
  Function CalcCompressionQuality(Const JPG: TJPEGImage;
  Const MustFit: Boolean = False): TJPEGQualityRange;
  Var
  aMS : TMemoryStream;
  aBMP : TBitmap;
  aJPG : TJPEGImage;
  aSize : Int64;
  lQ, hQ : Integer;
  Piv, oldPiv : Integer; // Ausgangswert = 0
• Forum: Multimedia

  AW: JPEG CompressionQuality ermitteln

    Delphi
    by Schwedenbitter, 17. Okt 2017
  Ich wollte mir gerade die Mühe machen, mal ein paar Bilder mit unterschiedlichen Raten zu packen und Dich die CompressionQuality auslesen zu lassen :twisted:
  Das wird nicht ausgelesen, sondern beim Erstellen der Klasse in Create mittels FQuality := JPEGDefaults.CompressionQuality; gesetzt. Das wiederum ist eben 90. Wenn man mit der Suche nach FQuality forscht, stellt man schnell fest, dass diese...
• Forum: Multimedia

  AW: Re: JPEG CompressionQuality ermitteln

    Delphi
    by Schwedenbitter, 16. Okt 2017
  Auch wenn das schon etwas älter ist. Ich wärme es auf, weil ich auch gern die Lösung wüsste und es einer der ersten Funde ist, wenn man in der DP und auch bei google sucht. Es wäre daher toll, wenn dann in genau diesem Beitrag eine/die Lösung stünde.
  
  
  
  a) Wie geht dieses "initialisieren"? Ich würde auch gern die richtige CompressionQuality in Erfahrung bringen.
  b) Der Link funktioniert...