Skip to Content
0
Former Member
Feb 12, 2014 at 11:03 AM

Font shrinking problem with barcode

125 Views

Hello,

I am having a problem with a barcode font. One of our customers uses a barcode font on a report and it shows correct in Crystal Reports.

The problem is when they export it to PDF using the .NET Crystal Viewer (RunTime 13, not sure which SP). The barcode is shrunk significantly. When exporting using the Crystal Reports editor (version 11.5) everything works fine.

I've noticed I am not the only one who is experiencing this problem, yet I have not been able to find a solution that works for me.

I have tried adding all kinds of registry values (found in different articles on the internet, including SAP forums).

I currently have the following code to try and make it work.

Dim rvk As Microsoft.Win32.RegistryValueKind = Microsoft.Win32.RegistryValueKind.DWord

Dim forceLargerFonts As String = "ForceLargerFonts"

If Environment.Is64BitOperatingSystem Then

rvk = Microsoft.Win32.RegistryValueKind.QWord

Microsoft.Win32.Registry.SetValue("HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\SAP BusinessObjects\Suite XI 4.0\Crystal Reports\Export\Pdf", forceLargerFonts, 1, rvk)

Microsoft.Win32.Registry.SetValue("HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\Business Objects\Suite 12.0\Crystal Reports\Export\Pdf", forceLargerFonts, 1, rvk)

Microsoft.Win32.Registry.SetValue("HKEY_CURRENT_USER\Software\Wow6432Node\Business Objects\Suite 12.0\Crystal Reports\Export\Pdf", forceLargerFonts, 1, rvk)

Else

Microsoft.Win32.Registry.SetValue("HKEY_LOCAL_MACHINE\SOFTWARE\Business Objects\Suite 12.0\Crystal Reports\Export\PDF", forceLargerFonts, 1, rvk)

Microsoft.Win32.Registry.SetValue("HKEY_CURRENT_USER\Software\Business Objects\Suite 12.0\Crystal Reports\Export\Pdf", forceLargerFonts, 1, rvk)

End If

Microsoft.Win32.Registry.SetValue("HKEY_CLASSES_ROOT\Software\Business Objects\Suite 11.5\Crystal Reports\Export\PDF", forceLargerFonts, 1, rvk)

Microsoft.Win32.Registry.SetValue("HKEY_LOCAL_MACHINE\Software\Business Objects\Suite 11.5\Crystal Reports\Export\PDF", forceLargerFonts, 1, rvk)

Microsoft.Win32.Registry.SetValue("HKEY_CURRENT_USER\Software\SAP BusinessObjects\Crystal Reports for .NET Framework 4.0\Crystal Reports\Export\PDF", forceLargerFonts, 1, rvk)

Unfortunately it doesn't work.

Any idea's?

Thanks.