这样来打开word或者excel怎么实现 --高分求助 ( 积分: 100 )

  • 主题发起人 主题发起人 shhw
  • 开始时间 开始时间
S

shhw

Unregistered / Unconfirmed
GUEST, unregistred user!
我现在需要在一个窗体内打开word(要和窗体成为一个整体)
怎么实现?请给我例子
 
放一个OleContainer
调用
OleContainer1.CreateObjectFromFile('...doc', False);
OleContainer1.DoVerb(0);
 
用System页的OleContainer控件。

procedure TForm1.Button1Click(Sender: TObject);
begin
OleContainer1.CreateObject('Word.Document',False);
OleContainer1.DoVerb(-1);
end;
 
这样不行啊
 
什么意思?是代码不工作还是得到的效果不是你希望的?
 
好了
还想问一下,用ole打开一个文件后为什么文件的Caption怎么不是原来的文件名啊
 
如果用ole打开word文档时怎么能显示出来主菜单
 
主菜单还要显示?那跟用word打开还有什么区别?Office那套东西,其实就是一个自动化服务器,Word的菜单只是提供你调用服务器功能的一个界面,你可以用自己的代码控制word里面的元素的。不知你为何又要显示word的菜单,是不是想让用户实现什么功能。
 
放个mainmenu就有了
 
我现在是word文档可以保存到数据库里
但是从数据库里面取出来,打开之后想在保存会数据库
怎么实现
 
强烈要求加分。。。
问个没完了。。。
打开后
OleContainer1.OleObject.Application就是Word.Application(Com对象)
然后对着Word中宏的帮助可以知道怎么操作。。。然后什么都可以搞了。。。
不过可以用OleContainer1.SaveAsDocument保存
 
我马上就给分
还有一个问题 就是在关闭word时怎么样知道文档已经被修改
 
多人接受答案了。
 

Similar threads

回复
0
查看
798
不得闲
回复
0
查看
978
不得闲
D
回复
0
查看
2K
DelphiTeacher的专栏
D
后退
顶部