Hallo,
habe bereits alle möglichen Quellen abgeklappert und auch die Hilfe zu PowerPDF bringt mich momentan nicht weiter.
Ich möchte die eingescannten Seiten als Grafiken im JPG-Format in einer PDF-Datei speichern. Mit Bitmaps und entsprechender Komprimierung klappts einwandfrei, aber die Dateigröße gefällt mir überhaupt nicht.
Jetziger Code:
Delphi-Quellcode:
AXObjectName := 'Page' + IntToStr(i);
AddXObject(AXObjectName, CreatePdfImage(FBitmap, 'Pdf-Bitmap'));
Canvas.DrawXObject(0, 0, FBitmap.Width, FBitmap.Height, AXObjectName);
Vielleicht hat bereits jemand Erfahrung hiermit und kann mir mit einem Tipp weiter helfen.
Vielen Dank!
RoGa