delphi 如何将WORD转换为PDF

发布网友 发布时间：2022-04-23 10:11

我来回答

共4个回答

热心网友 时间：2023-09-16 20:49

使用vba来指定保存的文件格式为pdf，当然前提必须已安装MS Office的PDF输出插件（默认应该有）
procere TForm1.btn1Click(Sender: TObject);
var
wdo,wdoc,wdocs : OleVariant;
begin
wdo := CreateOleObject('Word.Application');
wdocs := wdo.Documents;

wdoc := wdocs.Open('d:\test.docx');

wdoc.ExportAsFixedFormat(OutputFileName:=
'd:\test.pdf', ExportFormat:=17);
//查word的宏帮助
{ OpenAfterExport:='True', OptimizeFor:='wdExportOptimizeForPrint', Range:=
'wdExportAllDocument', From:=1, To:=1, Item:='wdExportDocumentContent',
IncludeDocProps:='True', KeepIRM:='True', CreateBookmarks:=
'wdExportCreateNoBookmarks', DocStructureTags:='True', BitmapMissingFonts:=
'True', UseISO19005_1:='False'); }

end;

热心网友 时间：2023-09-16 20:49

编程？
用Delphi？
五体投地！

热心网友 时间：2023-09-16 20:50

var
wdo,wdoc,wdocs : OleVariant;
begin
wdo := CreateOleObject('Word.Application');
wdocs := wdo.Documents;
wdo.ActivePrinter := 'Acrobat PDFWriter';
wdoc := wdocs.Open('c:\test.doc');
wdoc.PrintOut(0, 0, 0,'c:\test.pdf');
end;

参考资料：http://support.adobe.com/devsup/devsup.nsf/docs/50876.htm

热心网友 时间：2023-09-16 20:50

你打算怎么转换呢？
貌似很难。