怎样用wordapplication来打开一份word文档? wordapplication1.documents.open('your.doc'); 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 wordobj := createoleobject('word.document'); word := wordobj.application; word.visible := visible ; document:= word.documents.open(filename:=wordfilename,ReadOnly:=True) ; wordapplication1.documents.open('your.doc');好像不行阿,说参数不够,而fredfei大侠提出的方案,没有用到wordapplication,也是可以的,但还会同时还会打开一份空白的word文档,能不能不让这份空白文档打开呢? 真当麻烦,open居然有那么多参数。下面代码可以用,我调试过:var a: OleVariant;begin a := 'd:\obj.doc'; WordApplication1.Visible := True; WordApplication1.Documents.Open(a, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam)end; 关于枚举类型错误! JPG图片写入SQL数据库,如何在QREPORT报表中利用QRDBImage显示出供打印???在线等,急. 可是AVI文件怎么做,大家知道吗?请教了,谢谢 请教一个基础问题 FORM与FRAMES有什么区别 关于计时器! 300分在线等待,请教各位高手 如何实现用应用程序往网页里写入数据并提交? 怎么判断一个变量是何种类型? 怎么让数据库程序在没有bde的系统上运行? 如何让一个从TComponent继承下来的组件栏它的Parent(是一个Form)的事件。 如何在delphi中實現利用excel做報表的功能 如何定义TSocketNotifyEvent的过程?
word := wordobj.application;
word.visible := visible ;
document:= word.documents.open(filename:=wordfilename,ReadOnly:=True) ;
好像不行阿,说参数不够,而fredfei大侠提出的方案,没有用到wordapplication,也是可以的,但还会同时还会打开一份空白的word文档,能不能不让这份空白文档打开呢?
var
a: OleVariant;
begin
a := 'd:\obj.doc';
WordApplication1.Visible := True;
WordApplication1.Documents.Open(a, EmptyParam, EmptyParam, EmptyParam,
EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam,
EmptyParam, EmptyParam)
end;