Delphi中Word与浏览器交互

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:UserspeixiaobinDesktop12312.doc');
? ? ? oFileName := 'C:UserspeixiaobinDesktop12312.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进行传输。