【结】[问题]DataEdit显示多页

刺青

http://bbs.justep.com/forum.php? ... =OLE%2A%B7%AD%D2%B3

我按照上面的贴，写了下面三句代码，一执行就把word的工具栏给显示出来，能不能不显示WORD的工具栏？我想要的效果是：在DataEdit中显示WORD文档中的所有页。就这样简单。
  TOleContainer(DataEdit1.InplaceControl).AllowActiveDoc := True;
  TOleContainer(DataEdit1.InplaceControl).AllowInPlace := True;
  TOleContainer(DataEdit1.InplaceControl).DoVerb(Business.Forms.OleCtnrs.ovInPlaceActivate);

shangxy

这个去网上找找吧。
http://topic.csdn.net/u/20090903 ... a-ae1c094caefa.html
估计得调用vba来实现了。

刺青

OleContainer是DELPHI中提供的一个OLE包容器部件。使用它，可方便地把WORD、EXCEL等功能集成到自己的软件中来。相当于在自己的软件也可以使用WORD文字处理、EXCEL的表格功能了。
网上利用SERVERS页的部件的介绍较多，但对如何使用OleContainer进行编程的介绍并不多。
    经过一番探索，本人有了一些心得，特总结如下：
1、关于失去焦点的问题。
   在使用中，发现如果鼠标点到其他的部件上，如MEMO中，OleContainer就会失去响应。根据网上的介绍，这种现象是在OleContainer的一个事件中发生的。解决的方法是，从OleContainer继承创建一个自己的OLE部件，在其中覆盖这个事件。在其中不要做任何事就可以了。
2、关于OleContainer的周围出现黑边的问题。
    这个问题在VB中发现过，但在DELPHI中，我没有发现。
3、关于菜单与工具栏的问题。
   使用OleContainer部件，其OLE服务器的菜单会自动与窗口菜单融合。但在窗口中如果不 放    MAINMENU部件，就不会有菜单；有这个部件就会融合。设置将自己的菜单的GROUPINDEX设为1、3、5、…等就不会被融合，而2、4、6等会被融合。
   工具栏：由于工具栏是可以拖动的。故而比较难于控制。自定义的工具栏是通过注册表保存的，可以在启动程序时，将设定会好的内容载入，关闭程序时恢复。可以在自己的程序中使用自定义的工具栏，也可干脆不载入工具栏。注：菜单也是可以自定义的，但保存在哪，还没能搞清楚，似乎是保存在NORMAL。DOT中，但在OleContainer中，只会出现标准的菜单，但对菜单的修改可以在OleContainer中显示出来。新建就不行了。如有高手知道如何解决，还请赐教！
4、OleContainer在运行时可能会自动占用整个客户区，将其他PANEL的LOCKED属性设置为TRUE，就不会出现此情况了。
5、在OleContainer中使用宏的问题。



原贴地址http://www.winu.cn/space-14160-do-blog-id-13589.html
把贴放在，大家一起学习。
差不多可以实现，可以结了。

atiger

谢谢楼主共享