TOLEContainer的菜单问题，word里面的新建，打开，打印预览等失效

Question

http://delphi.ktop.com.tw/board.php?cid=30&fid=67&tid=84830谢谢

Answer 1

转自delphi超级猛料的一段话:Delphi VCL 底层控件 TOleForm 的限制，如果你确实需要“文件”菜单只能自己手动在 OleContainer 所在的 Form 中添加 TMainMenu并且设置相关MenuItem, OleContainer中的Word 激活后自然Menu会融合在一起。具体融合情况与MenuItem 的GroupIndex 有关，可参照 Delphi 的 Help.OleContainer 只鼓励编辑文档，而不愿提供保存，打印等支持。我们只能在自己手动添加的MenuItem相应的OnClick处理函数自己完成这些工作。这就要复杂多了，要调用Word的Automation方法来完成。答案是可以完成的，但速度实在是个问题。关于Word的Automation 方法可查阅 Word 的 VBA Help

Answer 2

界面上要做得漂亮,就要用到楼上的方法;但相对来说,代码逻辑复杂一些;建议还是用CreateOleObject,或者干脆用Servers一栏的控件,来操作word,简单方便参考:Delphi与Word之间的融合技术http://www.yesky.com/401/1700901.shtml
http://www.yesky.com/401/1700901_1.shtml

Answer 3

to  do2008
谢谢你的回答，不过用vba测试过了，实现不了用Servers的控件道理是一样的，那几个按钮还是出不来，你可以自己测试一下

Answer 4

我用 标准控件 servers 里组件 还是可以的
遇到 rpc不可用的 话 多 try //

Answer 5

楼上的兄弟，具体怎么用，office是嵌入在olecontainer里面的吗

Answer 6

>>用Servers的控件道理是一样的，那几个按钮还是出不来，你可以自己测试一下用Servers组件的话,它不是在delphi 的窗口上显示,word的编辑界面,而是直接运行word,你可以将一些数据,用代码自动写入到,word中,并调用相关的接口:如打印\保存;等

Answer 7

to do2008谢谢你的回家，因为我需要嵌入到activexform里面，所以需要这样处理。

Answer 8

csdn真不爽，字打错了不能修改，郁闷