Home Devices

Is there any way to save each page of a report as a single file?

I am using Report Builder 19.04 and Delphi XE7

I want to save each page of the report as a single file.
Is there anyway to realise it?
Now I control the dataset to create a report for each record and save it.
I wonder maybe some smarter method can do this job.

Thanks for your help.

Yong

Comments

  • Hi Yong,

    Take a look at the following article on how to export each page in a report as a separate file. The example uses the PDF device but this method will work for any export option.

    http://rbwiki.digital-metaphors.com/output/pdf/how-to-send-each-page-as-a-pdf/


    Best Regards,

    Nico Cizik
    Digital Metaphors
    http://www.digital-metaphors.com
  • Hi, Nico

    It is vey kind of you for your information. Now I can export each page of my report to a PDF file.
    But asian characters(UNICODE) in report is garbled by this way. Would you mind give me some hints on how to export UNICODE characters correctly?

    Thank you in advance.

    Yong
  • Hi Yong,

    You need to be sure the PDFSettings.FontEncoding property is set to feUnicode. For the example, if you are setting this property in the report, I suggest assigning the Report.PDFSettings to the PDFDevice.PDFSettings.


    procedure TForm1.ehDevicePageReceive(Sender, aPage: TObject);
    var
    lPage: TppPage;
    lFileDevice: TppPDFDevice;
    begin

    lPage := TppPage(aPage);

    lFileDevice := TppPDFDevice.Create(self);
    lFileDevice.PDFSettings.Assign(ppReport1.PDFSettings);

    ...
    Best Regards,

    Nico Cizik
    Digital Metaphors
    http://www.digital-metaphors.com
  • Hi, Nico

    It works perfectly .
    Thank you very much!

    Yong
Sign In or Register to comment.