PDFToolKit вывод текста, кодировка

[Ден16]

С помощью PDFToolKit пытаюсь вывести надпись "Мой текст" в PDF.

PDFDocument: TgtPDFDocument;

PDFDocument.TextOut(
'<font charset="Windows-1251"; face="Arial"; size="24">Мой текст',
1, 10, 10);

В результате получается "Ìîé òåêñò"

Что не так, где указать кодировку?

[Serge_Bliznykov]

а давайте начнём с того, какая у Вас версия Delphi ?
Unicode?

так пробовали:

s := '<font face="Arial Unicode MS" size=24 '+
       'CHARSET="ANSI_CHARSET">Мой текст</font>';
PDFDocument.TextOut(s, 1, 10, 10);

[Ден16]

Сообщение от Serge_Bliznykov

...какая у Вас версия Delphi ? Unicode?

так пробовали:

s := '<font face="Arial Unicode MS" size=24 '+
       'CHARSET="ANSI_CHARSET">Мой текст</font>';
PDFDocument.TextOut(s, 1, 10, 10);

Версия Delphi XE7, Unicode. Как написали попробовал, не помогло ((

[Ден16]

Короче вот ответ разработчиков:

In PDF, Unicode text has to be encoded as CID encoding which is currently not supported. PDFToolkit can encode ANSI text. We will let you know as soon as we support it.

As a work around, you can insert a text form field with ReadOnly=True and set the Unicode value. This will render fine in Adobe Reader and our viewer. This works as the text is encoded as-is (UTF-8) rather than converted to CID encoding which is needed for normal PDF content.

Please feel free to contact us for any assistance you need.

Thank you,

[Serge_Bliznykov]

понятно.
попробуйте так

var s :AnsiString;

s := Utf8ToAnsi('<font charset="Windows-1251"; face="Arial"; size="24">Мой текст'); // как вариант, можно ещё попробовать Utf8ToAnsiEx с указанием кодовой страницы

PDFDocument.TextOut(s,1, 10, 10);

[Ден16]

Сообщение от Serge_Bliznykov

понятно.
попробуйте так

var s :AnsiString;

s := Utf8ToAnsi('<font charset="Windows-1251"; face="Arial"; size="24">Мой текст'); // как вариант, можно ещё попробовать Utf8ToAnsiEx с указанием кодовой страницы

PDFDocument.TextOut(s,1, 10, 10);

Так к сожалению тоже не работает, результат "??? ?????".

[Ден16]

Буду делать как советовали разработчики, обходным путем. Спасибо за помощь!