update
This commit is contained in:
+13
-13
@@ -1,20 +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("仿宋", "宋体");
|
||||
alias := "";
|
||||
doc := "D:\\temp\\wordtopdf\\3M.docx";
|
||||
// doc := "D:\\temp\\test1.docx";
|
||||
// doc := "D:\\temp\\nihao.docx";
|
||||
// doc := "D:\\temp\\wordtopdf\\3M1.docx";
|
||||
output := "D:\\temp\\1.pdf";
|
||||
|
||||
docx_to_pdf.Transform();
|
||||
err := docx_to_pdf.SaveToFile(alias, output);
|
||||
echo "SaveToFile::\t", "err := ", format("%x", err), "\toutput_file := ", output, "\n";
|
||||
sysparams["_PDF_PAGE_GRID_DEBUG_"] := 0;
|
||||
sysparams["_PDF_TEXT_DEBUG_"] := 0;
|
||||
docx_to_pdf := new TSDocxToPdf(alias, doc);
|
||||
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;
|
||||
|
||||
|
||||
Reference in New Issue
Block a user