lazarus linux下使用powerPDF控件中文乱码的解决方法

本文主要是介绍lazarus linux下使用powerPDF控件中文乱码的解决方法，对大家解决编程问题具有一定的参考价值，需要的程序猿们随着小编来一起学习吧！

      lazarus linux下使用powerPDF中文乱码使用网上的修改方法还是存在出现乱码问题，经跟踪powerpdf源码，除启用PRreort.pas {$DEFINE USE_GBFONTS}外，还要修改pdfdoc.pas TPdfCanvas.ShowText(const s: string)，并添加LConvEncoding单元，使用UTF8ToCP936将UTF8转为CP936。
   修改后的powerpdf在windows和linux都可以正确保存含中文的pdf，不过还存在非中文字符的字间距有点大的问题。

pdfdoc.pas:
procedure TPdfCanvas.ShowText(const s: string);
var
  FString: string;
begin
  if _HasMultiByteString(s) then
    FString := '<' + _StrToHex(s) + '>';
  else
    FString := '(' + _EscapeText(s) + ')';
  WriteString(FString + ' Tj'#10);
end;

改为：

uses LConvEncoding;//添加这个单元

procedure TPdfCanvas.ShowText(const s: string);
var
  FString: string;
begin
  FString := '<' + _StrToHex(LConvEncoding.UTF8ToCP936(s,true)) + '>';
  WriteString(FString + ' Tj'#10);
end;

这篇关于lazarus linux下使用powerPDF控件中文乱码的解决方法的文章就介绍到这儿，希望我们推荐的文章对大家有所帮助，也希望大家多多支持为之网！