var
WordApp,WordDoc: Variant;
doc: TWordDocument;
DocInx,oFileName,CfCversions,oReadOnly,AddToRctFiles,PswDocument,
PswTemplate,oRevert,WPswDocument,WPswTemplate,oFormat,oFileDoc: OleVariant;
begin
try
begin
WordApp := CreateOleObject('word.Application');
WordDoc := WordApp.documents.open('C:\Users\peixiaobin\Desktop\12312.doc');
oFileName := 'C:\Users\peixiaobin\Desktop\12312.html';
PswDocument := wdFormatFilteredHTML;
WordDoc.SaveAs(oFileName,PswDocument);
end;
finally
WordApp.quit;
end
WordApp,WordDoc: Variant;
doc: TWordDocument;
DocInx,oFileName,CfCversions,oReadOnly,AddToRctFiles,PswDocument,
PswTemplate,oRevert,WPswDocument,WPswTemplate,oFormat,oFileDoc: OleVariant;
begin
try
begin
WordApp := CreateOleObject('word.Application');
WordDoc := WordApp.documents.open('C:\Users\peixiaobin\Desktop\12312.doc');
oFileName := 'C:\Users\peixiaobin\Desktop\12312.html';
PswDocument := wdFormatFilteredHTML;
WordDoc.SaveAs(oFileName,PswDocument);
end;
finally
WordApp.quit;
end
end;
word编辑文件,网页视图,编辑。然后通过这个程序转换成html格式。传输到POS端。可以打开这个文件。进行浏览。
以前使用另存成XPS来进行传输,但是XPS是office2010才出来的。用IE打开的时候也比较慢。显示的效果也不太好看。delphi7支持到officexp:与office交互起来有点困难。最后只能保存成word.然后保存成html进行传输。
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 [email protected] 举报,一经查实,本站将立刻删除。