用OleContainer方法做一个程式,当用另一个窗体镶嵌入一个Panel的方法实现word只在OleContainer框内(Panel)显示时,Word菜单却消失了(参考: http://delphi.ktop.com.tw/topic.php?topic_id=54757) 但我需要显示Word菜单,并和自己的主程式菜单融合,怎么办?

您好：小弟下载了Chance36 前辈的范例 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=54763 运行一切正常,效果很好，Word菜单并没消失。您是怎么做测试的 <> ============================ 为什么经过多年以后，得失的过程如此冷漠 ============================

我运行的没有菜单啊,工具栏是有,你能抓个图我看嘛? 我又当了一次运行,还是没有菜单 發表人 - aixiner 於 2005/08/10 18:07:25

没有菜单只有工具栏 你能抓拍一个图像嘛 我刚有当了那程序运行,还是没有菜单啊

您好：先确定几个问题： 1、您是否是直接下载运行并没做任何修改？ 2、您的作业环境是什么？ 3、放出您的运行的结果 4、去站内查找或书上查找“OleContainer”了解相关的知识 5、一味的想知道运行结果是为何？ 下面是小弟这里执行的结果： ============================ 为什么经过多年以后，得失的过程如此冷漠 ============================

你有菜单是自己的,没有Word的菜单,十多项呢,没有啊,朋友 發表人 - aixiner 於 2005/08/11 09:18:02

没人能帮我解决这个问题嘛

aixiner 您好： 别在这里等答案！    我到最后才明白您的意思，您的意思是将work菜单融合到自己Form菜单中。 各拉一个OleContainer1,MainMenu1至Form1,将OleContainer1.AutoActivate:=aaGetFocus，在Form1的onShow事件中下：

 procedure TForm1.FormShow(Sender: TObject);
begin
  OleContainer1.DoVerb(ovPrimary);
end;

即可。 不过美中不足的是word菜单中的File这个菜单会消失，可能是OleContainer1的BUG吧，小弟也不是很清楚。执行的结果如图： ============================ 为什么经过多年以后，得失的过程如此冷漠 ============================

如果光是菜单融合,第一次用OLE就能实现啊,还需要这么费,这里的目标就是它能实现特殊效果,把Word控制在Panel的范围内,现在就只需要把菜单融合到自己的菜单里,就OK了,却实现不了,这两者效果却一不可才行

aixiner你好： 1、你有自己在同一个Form上拉一个panel试过？ 2、“如果光是菜单融合,第一次用OLE就能实现啊,还需要这么费”既然你都有更好的方法。就别在这里等了！ 3、小弟对你无能为力，你自请高明！     ============================ 为什么经过多年以后，得失的过程如此冷漠 ============================

一直是在同一个From里拉Panel去实现的,但有一个很大的问题,工具栏会和From的工具栏融合或者说替代,而我要的效果是,工具栏要限制在Panel内,所以才在这里面找到了一个在别的窗口,放OLE,然后镶嵌进Panel的方法,但是最后才发现,菜单融合消失了

晕,在这里找不到解决方案?