简单段落

This commit is contained in:
csh
2024-05-20 10:02:06 +08:00
parent 5b7abadba1
commit 61001c9a46
16 changed files with 671 additions and 21 deletions
+20
View File
@@ -0,0 +1,20 @@
// NameSpace "DOCX";
WordToPdf();
function WordToPdf();
begin
alias := "";
doc := "D:\\temp\\fangan.docx";
output := "D:\\temp\\1.pdf";
// doc := "/mnt/d/temp/fontsize.docx";
// output := "/mnt/d/temp/1.pdf";
docx_to_pdf := new TSDocxToPdf(alias, doc);
docx_to_pdf.Font.UseBuiltInFont();
docx_to_pdf.Font.SetSubstitutionRules("仿宋", "宋体");
docx_to_pdf.Transform();
err := docx_to_pdf.SaveToFile(alias, output);
echo "SaveToFile::\t", "err := ", format("%x", err), "\toutput_file := ", output, "\n";
end;