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:\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进行传输。

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值