frxExportPDF 화일을 열어서 TfrxPDFFont.GetFontName: AnsiString; 프로시저의
function HexEncode7F(Str: WideString): AnsiString; 함수를 아래와 같이 수정하시면 됩니다.
//변경한 소스
function HexEncode7F(Str: WideString): AnsiString;
var
// 신규 변수 추가
AnStr: AnsiString;
s: AnsiString;
Index, Len: Integer;
begin
s := '';
AnStr := Str; //신규 추가
Len := Length(AnStr); //수정
Index := 0;
while Index < Len do
begin
Index := Index + 1;
if Byte(AnStr[Index]) > $7F then //수정
s := s + '#' + AnsiString(IntToHex(Byte(AnStr[Index]), 2)) //수정
else
s := s + AnsiString(AnStr[Index]); //수정
end;
Result := s;
end;
이렇게 소스를 변경하시면 한글이 깨지는 현상은 제거가 될껍니다.
덕분에 해결했습니다.