遇到一个非常头疼的问题,就是我想使用OLE的方式来加载文件,在标准窗体中,OLE的菜单会很正常的与窗体菜单合并,我想,如果用ActiveForm把这个OLE封装进OCX中去,如果还能带菜单的话岂不是很爽,于是把WinForm中的内容移植到了ActiveForm中,但是ActiveForm是没有Menu属性的,也就是说我们的TMainMenu对象在ActiveForm中是显示不出来的,于是,我又想到一个办法,TToolBar有Menu属性,于是,我在ActiveForm上放了一个ToolBar,并把其Menu属性指向了那个万恶的MainMenu1,期待奇迹就此发生,编译成ocx后,很牛B的加载到了其他开发环境中,奇迹真的发生了,不过不是我想要的结果,我的OCX上有菜单,但仅限于我MainMenu中原有的菜单,而从OLE中合并出来的并未出现,经过一周左右的不断试验后,问题仍然没有解决,不过毛病却找到了,初步发现是在Menus.pas文件和Forms.pas文件中存在着一些问题,TMainMenu有个属性叫WindowHandle,指的是所属的窗体的Handle,对应的私有数据成员叫FWindowHandle,就是这个FWindowHandle,弄了我一星期都没有搞定,因为这个属性并不是在TMainMenu类中赋的值,而是在TCustomForm的SetMenu中赋的值,而这个SetMenu函数就是窗体类中Menu属性的那个输入函数,而在TMenu类以及其子类中有好多关于菜单合并的代码都对FWindowHandle值进行了判断,这就造成了没有指定Form的Menu属性时无法显示合并菜单的问题,ActiveForm中的问题也是如此,因为在ActiveForm中压根儿就没有Menu属性,哪来的FWindowHandle,这个值只能为0!我改了N天的代码,但是始终没能让OLE菜单中ToolBar中显示出来,不过又发现了另外一个情况,原来Ole合并的菜单使用API函数求菜单项的Count时是能求到的,但是在运行时求TMainMenu.items.Count时却是不包含OLE菜单的,这就不难解释为什么用ToolBar实现的菜单中不包含OLE合并上来的菜单了,因为ToolBar是在初始化或用代码指定其Menu属性时才与MainMenu同步菜单项,而OLE合并却是与运行时生成的菜单进行合并,所以ToolBar无论如何也感知不到OLE的菜单,到此,我暂时没有好的办法,我能想到的办法就是用API枚举出OLE菜单项来,用代码添加到TMainMenu中去,这样ToolBar就能感知到了,但是这几天想得头都要破了,实在是无力去实现,看看哪位达人能帮在下把这个问题解决掉,不胜感激,愿以人民币表示感谢。我的开发工具是Delphi7。

解决方案 »

  1.   

    谢谢大家能看完这段。看完不懂但有兴趣的,可以先学习一下COM+和Windows API相关知识。希望大家能有好的解决方案。
      

  2.   

    近期西数VPS很不稳定,正好也要到期了,于是我就对了几家的VPS,最终确定是PBS VPS ,套餐选了最廉价的Standard,不过我选到了最想要的机房:HK Mege,这是我目前为止,从HK到国外最快的VPS了。配置:
         硬盘:15G
         内存:256M
         IP  :  1个 HK出口(可以提供电信/网通/国际出口)
         Hot backup : 1
    PBS VPS刚买的时候有点担心,因为一个月180块,如果买便宜的VPS,可以买好多个。在买之前我联系了他们试用了两天,打消了我的疑虑。我主要看中了有HK的出口,还有hot backup的功能,而且那里的NOC团队也给我了很大的帮助。在试用的两天,我装了几次系统和遇到了几个问题,他们的NOC团队总是能给我最好的解决。我让我HK和美国的朋友测试一下到我的网站速度,他们的感觉都是好快的。这点我是比较满意的。
    有点不满意的是他们那里提供的VPS只有CentOS版的,我原本想要RHEL版的,不过他那里没有,不过都是相通的,就用了CentOS了。
    好了,大家也可以去试试PBS VPS,有想了解的,可以站内发短信给我。这里我就不说了,防止有打广告的嫌疑
      

  3.   

    哥写的太先进了,怎么连段落都不分一下?继续 loading.......
      

  4.   

    a a aa a a aaaaaaaaaaaaaaaaaaaa不是吧?
      

  5.   

    不用回贴了,我不是来这里看你们顶来顶去的或是骂来骂去的。自己搞定了。解决办法很简单,就是直接用API读取OLE菜单,然后把OLE菜单项一项一项增加到Menu中去,重新绑定一下ToolBar即可。