PDF and Icelandic characters

rbuser

Hi,

I'm generating a PDF report using some Icelandic characters and they always
get sticky on the readout.
example characters would be ? (also a greek letter), ?,?,? etc. (hope you
can see these).
I have seen Icelandic characters in PDF that look alright so it's probably
not an Acrobat bug.

Thank you,
Valdimar

nicocizik

Hi Valdimar,

The ReportBuilder PDF device currently does not support embedded fonts. It
is on our todo list for a future release to add this feature. One option is
to be sure you are using the latest version of Acrobat. Adobe has
constantly been adding new native fonts to the product for every new
version.

You may also consider using one of the third party PDF export devices
available. The following web site shows a list of these export devices.

http://www.digital-metaphors.com/download/output_devices.html

--
Regards,

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

rbuser

Hi Nico,

I've update ReportBuilder and Acrobat but the problem perstists.
I have seen PDFs with Icelandic characters but most of them have this same
problem.
I'll be looking into the 3d party PDF export devices and I'll keep you
posted with the results.

Thanks,
Valdimar

rbuser

Hi Nico,

I decided to buy PsRBExportDevice Pro as the trial for it was the easiest to
install and it worked with only one line of code.
It completely fixes my problems with Icelandic characters but it is
hindering me in using the method I had finally gotten to work for multiple
pages.

Now for one page I do this:

ppReport1.PrintToDevices;
ExportToPDF(ppReport1, 'Sample.pdf');

Then for the multiple pages I'm doing this:

procedure ManyPages;
lPDFDevice: TmyPDFDevice;
begin
lPDFDevice := TmyPDFDevice.Create(nil);
lPDFDevice.FileName :=
IncludeTrailingPathDelimiter(ExtractFilePath(application.ExeName))+'MyReport.PDF';

lPDFDevice.EndPrintJob := False;
lPDFDevice.Publisher := ppReport1.Publisher;
for i := 0 to CmboBxInstitutions.Items.Count -1 do
begin
OpenTables(CmboBxInstitutions.Items[i]);
ppReport1.PrintToDevices;
lPDFDevice.Reset;
lPDFDevice.StartPrintJob := False;
if i = CmboBxInstitutions.Items.Count -1 then
lPDFDevice.EndPrintJob := True
else
lPDFDevice.EndPrintJob := False;
end;
ExportToPDF(ppReport1,'Sample.pdf');
lPDFDevice.Free;
end;

The problem is that the ExportToPDF procedure (which is a part of my new
component) seems to only take the last page sent to the PrintDevices. I've
sent them an e-mail about this but as I've been very happy with your support
so far I thought I'd give it a try

Thanks,
Valdimar

nicocizik

Hi Valdimar,

Unfortunately I am not familiar with the PsRBExportDevice source code. My
first guess would be that they are overriding the StartJob and/or EndJob
routines in their own PDF Device class and something in this code needs to
happen in order to export correctly. I would suggest taking a look at the
source (if it was included) and perhaps tracing through it to see how it
works.

--
Regards,

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