You are not logged in.
Pages: 1
Can you get page in QR as Metafile (or EMF), if you can try to insert those with Canvas.RenderMetaFile.
I can't, i need only to export my quick report to pdf, with Arabic Fonts support;
I have a quick report in delphi 11 which almost fonts are Arabic font, How can i export it to PDF. I try to use this but no success:
uses
SynPDF;
// ...
var
PDF: TPDFDocument;
PDFCanvas: TPdfCanvas;
i: Integer;
begin
PDF := TPDFDocument.Create;
try
PDFCanvas := PDF.Canvas;
PDFCanvas.SetSize(bitmap.Width, bitmap.Height);
for i := 0 to FormCertify3.QuickRep2.QRPrinter.PageCount - 1 do
begin
PDFCanvas.DrawFormXObject(FormCertify3.QuickRep2.QRPrinter.GetPage(i + 1), 0, i * FormCertify3.QuickRep2.Height);
if i < FormCertify3.QuickRep2.QRPrinter.PageCount - 1 then
PDFCanvas.NextPage;
end;
PDF.SaveToFile('e:\EmailReport.pdf');
finally
PDF.Free;
end;
end;
Pages: 1