Quality property does not work for v5

Comments

• gpi

  January 2015 edited 7:09PM

  Try to use latest 5.2.3
• y_okada

  January 2015 edited 7:09PM

  gpi wrote: »

  Try to use latest 5.2.3

  
  Thank you for your reply.
  
  I am using FastReport with RadStudio XE4. For XE4, v5.1.2.18 is the latest.
  
  
• gordk St.Catherines On. Canada.

  January 2015 edited 7:09PM

  Better check your dl page again 5.2.3 is latest
• y_okada

  January 2015 edited 7:09PM

  gordk wrote: »

  Better check your dl page again 5.2.3 is latest

  
  I appreciate your reply.
  I will check that version.
  
• y_okada

  January 2015 edited 7:09PM

  With my current licensing style for FastReport, I cannot get the v5.2.3 (through an agency company, which has some delay for the update). So I cannot confirm whether or not v5.2.3 is fixed for this bug.
  
  So, I decided not to use PDFExport function, instead to use BMPExport function and zip it to reduce the file size.
  
  
  
• gpi

  January 2015 edited 7:09PM

  Do you have a FR sources?
• y_okada

  January 2015 edited 7:09PM

  gpi wrote: »

  Do you have a FR sources?

  
  I have.
  
  
• gpi

  January 2015 edited 7:09PM

  Modify frxExportPDF.pas

        { Write XObject with a picture inside }
  
        Jpg := TJPEGImage.Create;
  
        try
          if (Obj.ClassName = 'TfrxBarCodeView') or
             (Obj is TfrxCustomLineView) or
             (Obj is TfrxShapeView) then
          begin
            Jpg.PixelFormat := jf8Bit;
            Jpg.CompressionQuality := FQuality + 5;  //change this line
          end
          else
          begin
            Jpg.PixelFormat := jf24Bit;
            Jpg.CompressionQuality := FQuality;  //change this line
          end;
  
• y_okada

  February 2015 edited 7:09PM

  gpi wrote: »

  Modify frxExportPDF.pas

        { Write XObject with a picture inside }
  
        Jpg := TJPEGImage.Create;
  
        try
          if (Obj.ClassName = 'TfrxBarCodeView') or
             (Obj is TfrxCustomLineView) or
             (Obj is TfrxShapeView) then
          begin
            Jpg.PixelFormat := jf8Bit;
            Jpg.CompressionQuality := FQuality + 5;  //change this line
          end
          else
          begin
            Jpg.PixelFormat := jf24Bit;
            Jpg.CompressionQuality := FQuality;  //change this line
          end;
  

  
  Thank you very much for your code.
  
  I am trying now.
  
  
  
• y_okada

  February 2015 edited 7:09PM

  @ gpi
  
  This is my first time to update FastReport(third party software's) source file.
  
  To reflect the modification of the source, what should I do?
  
  I re-build my project file. But, of course, it did not reflect the modification of the frxExportPDF.pas
  
• y_okada

  February 2015 edited 7:09PM

  y_okada wrote: »

  @ gpi
  
  This is my first time to update FastReport(third party software's) source file.
  
  To reflect the modification of the source, what should I do?
  
  I re-build my project file. But, of course, it did not reflect the modification of the frxExportPDF.pas

  
  I found the way to rebuild the package.
  
  There is an execution file named "recompile.exe" under FastReport folder. With it, I could reflect the modification.
  
  
  
• y_okada

  February 2015 edited 7:09PM

  @ gpi
  
  Thank you very much.