还是老问题,保存PDF字体时字体名编码错误,和2.x/3.x时一样的错误,修正其实很简单。
用下面的替换 TfrxPDFFont.GetFontName: AnsiString 中的同名函数
function HexEncode7F(Str: WideString): AnsiString;
var
s: AnsiString;
// add by ijia 2010-04-05
t: AnsiString;
Index, Len: Integer;
begin
s := \'\';
// add by ijia 2010-04-05
t := Str;
Len := Length(t);
Index := 0;
while Index < Len do
begin
Index := Index + 1;
if Byte(t[Index]) > $7F then
s := s + \'#\' + AnsiString(IntToHex(Byte(t[Index]), 2))
else
s := s + AnsiString(t[Index]);
end;
Result := s;
end;
FastReport 导出Pdf 乱码
内容版权声明:除非注明,否则皆为本站原创文章。