I'm using delphi7 in winXP Pro.
AddLabel is Same with AddTextArea.
only Korean Text Part does not show up.
I Used some Fonts and your sample source.
But I did not show up.
is there any other methods?
====================== Source =======================
aDocument := CreateOleObject('DynamicPDF.Document');
aDocument.LoadPdf(aFilePath);
// aFont := aDocument.AddFont('C:\WINDOWS\Fonts\MALGUN.TTF');
// aFont := aDocument.AddFont('C:\WINDOWS\Fonts\verdana.TTF');
aStr := '?????.'; // Korean Text Does Not Show up. only last comma show up.
// aStr := 'ABCDEF.'; // Alphabet Show up.
aPage := aDocument.GetPage(1);
aTextArea := aPage.AddLabel(aStr, 200, 200, 200, 12);
aPage := aDocument.GetPage(1);
// aTextArea := aPage.AddTextArea(aStr, 100, 100, 200, 12, DPDF_Font_HanyangSystemsGothicMedium, 12, clRed);
// aTextArea := aPage.AddTextArea(aStr, 100, 100, 200, 12, aFont, 12);
// aTextArea := aPage.AddTextArea(aStr, 100, 100, 200, 12);
// aTextArea.Font := aFont;
aDocument.DrawToFile('c:\abc.pdf');