From e20183d4510d0a5f690ae5748102932cd4a43aa0 Mon Sep 17 00:00:00 2001 From: jesusr Date: Sat, 31 Mar 2012 18:08:22 +0000 Subject: [PATCH] PowerPDF: use DeviceGray for grayscale JPEG images git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2374 8e941d3f-bd1b-0410-a28a-d453659cc2b4 --- components/powerpdf/PdfJpegImage.pas | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/components/powerpdf/PdfJpegImage.pas b/components/powerpdf/PdfJpegImage.pas index 30b5e3394..5f1897632 100644 --- a/components/powerpdf/PdfJpegImage.pas +++ b/components/powerpdf/PdfJpegImage.pas @@ -55,7 +55,10 @@ begin begin AddItem('Type', TPdfName.CreateName('XObject')); AddItem('Subtype', TPdfName.CreateName('Image')); - AddItem('ColorSpace', TPdfName.CreateName('DeviceRGB')); + if TJPegImage(AImage).GrayScale then + AddItem('ColorSpace', TPdfName.CreateName('DeviceGray')) + else + AddItem('ColorSpace', TPdfName.CreateName('DeviceRGB')); AddItem('Width', TPdfNumber.CreateNumber(AImage.Width)); AddItem('Height', TPdfNumber.CreateNumber(AImage.Height)); AddItem('BitsPerComponent', TPdfNumber.CreateNumber(8));