Office XP 效果菜单控件

beta版
1.彻底实现OfficeXP效果菜单控件
2.无需修改你现有程序、无需加写代码...
3.彻底解决菜单朝上时的绘制效果...
4.彻底解决词霸取词时对阴影绘制的影响...
5.自由软件、随意使用...http://ajusoft.6vv.net

解决方案 »

  1.   

    好东西，一定给偶留份
    顺便COPY一份源码偶研究下
      

  2.   

    xpMenuCtl测试第三版http://ajusoft.126.com
    http://202.111.154.52/other/wl/aju/bbs/解决的问题：
    1.完成了在98下对主鼠标在菜单条上面时的高亮效果;以及2K和XP下如果运行过CS后不能绘制这种高亮效果的bug.
    2.对系统菜单的自绘,包括左上角菜单,标题栏右键菜单,任务栏右键菜单.
    3.菜单在临近屏幕边缘时处理.
    4.修正菜单朝上时的阴影.
    5.修改如果系统设定菜单滚动效果时的阴影自绘的bug.
    6.修改菜单无效时的效果.
    7.放过对文本框右键菜单的自绘,因为我一直没有找到如何获得这个菜单的句柄(不是指hwnd,而是hMenu)几个效果图
    http://202.111.154.52/other/wl/aju/bbs/images/upfile/200451311532.gif
    http://202.111.154.52/other/wl/aju/bbs/images/upfile/200451311646.gif
    http://202.111.154.52/other/wl/aju/bbs/images/upfile/200451311732.gif
      

  3.   

    smart 偶一直用 smartxpvbgood下有
      

  4.   

    MDI子窗体不行，有没有解决方法
      

  5.   

    发布第四测试版
    1.支持MDI窗体 http://202.111.154.52/other/wl/aju/bbs/images/upfile/200473113023.gif
    http://202.111.154.52/other/wl/aju/bbs/images/upfile/20047311322.rarhttp://ajusoft.6vv.net
    http://ajusoft.126.com
      

  6.   

    它跟VSNETMENU有什么区别吗？要不要付钱的？
      

  7.   

    与状态条兼容的问题已经修改过了
    http://www.xjpa.com/other/wl/aju/bbs/images/upfile/200486171534.rar
      

  8.   

    搂主能告诉我怎么解决的和状态兰不兼容的问题吗？它一直困扰着我！
    [email protected]
      

  9.   

    其实很简单，你看看这里
    http://msdn.microsoft.com/library/default.asp?url=/library/en-us/shellcc/platform/commctls/comboboxes/comboboxreference/comboboxstructures/drawitemstruct.asp
      

  10.   

    你的判断CtlType是否是ODT_MENU，我在判断的时候写了个手误，把＝写成and了。
      

  11.   

    我就是判断CtlType是ODT_MENU啊！我先试试，谢了！
      

  12.   

    还有一个问题啊！楼主啊好像用了你的控件以后,编译成exe以后运行就出现什么应用程序错误，菜单都没有了，什么内存不能为什么的！
      

  13.   

    能否把你的程序发给我
    [email protected]
      

  14.   

    to accpedu(人月神话) 
    不应该有这样的问题啊，我没有出现这问题，看看你下到的ocx是不是xpmenusm.ocx，（右键属性）文件版本是3.0。
      

  15.   

    效果怎么样哦？和vsnetmenu比怎么样？
    我也想自己做一个呢。但是不知道关于菜单编辑器的设计 ：（
    能不能教我一下啊？
      

  16.   

    to accpedu(人月神话) 
    真是太感谢你了，我以前也发现了这个问题，在我一个同事机器上一运行就死程序，我没有太在意，以为是他的计算机系统有问题就放过了。现在你提出来，我又重新试了确实如此，但是当我想在他机器上装visual studio调试时（原来没装），问题却消失了；费了很大劲才查清楚我在一个类中调用了tlbinf32.dll中的函数，但是此DLL好像是Visual Studio发布的，所以没装Visual Studio的机器没有此DLL，即导致错误。
    谢谢！现在问题已得到修正。下载地址如下：
    http://www.xjpa.com/other/wl/aju/bbs/images/upfile/200481310429.rar效果图
    http://www.xjpa.com/other/wl/aju/bbs/images/upfile/2004813104128.gif
      

  17.   

    ajuXuan(阿军) 呀，
    我下了一个XPMENU控件，200481310429.rar。是不是最新的？
    发现在设计是没有什么问题很正常。但生成EXE后，发现对状态栏有影响，退出程序是退不出来（程序无响应，占CPU100%）？
    XP按钮控件，是一台98的机器上出现一个怪事，我在窗体上画了一个关闭窗口的XP按钮，当然还有其它功能按钮，其它的按钮使用都很正常，但这点关闭按钮来关闭窗体时就会出现自动化错误，但在2000上没有发现问题。
      

  18.   

    billow_chentao(巨浪) 
    是最新的，如果你以前下过，记得重新注册一下 用regsvr32命令。
    对状态栏的影响你下的那一版已经解决了。下面是新的版本。
    http://www.xjpa.com/other/wl/aju/bbs/images/upfile/2004819102854.rar对于按钮控件，我没有碰到这个问题，不知道你方不方便把你的程序发给我，让我试试，保密问题你可放心。[email protected]
    谢谢！
      

  19.   

    XP按钮控件，在一台98的机器上出现一个怪事，我在窗体上画了一组按钮，其中一个关闭窗口的XP按钮，其它的按钮使用都很正常，但点关闭按钮来关闭窗体时就会出现自动化错误，点“X”关闭窗体都正常，但在2000上 没有 发现问题很正常。
    在我的那个窗体里是这样写的：
    Private Sub Cmd_Click(Index As Integer)
    Select Case Index
        Case "0" '保存
            Call SaveCard
        Case "1" '放弃
            Edit = False
            Call PlayCard(ID)
        Case "2" '新增
            Edit = True
            ID = 0
            Call PlayCard(ID)
        Case "3" '修改
            Edit = True
            Call PlayCard(ID)
        Case "4" '删除
            Call DelCard
        Case "5"    '关闭
            Unload Me
        Case "6" '刷新
            Call PlayTree
    End Select
    End Sub另外就是在关闭窗体的事件里有这个：
    Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
        If Edit = True Then
            If MsgBox("当前修改没有保存，是否要放弃修改关闭窗口。", vbQuestion + vbYesNo, "关闭窗口") = vbNo Then
                Cancel = 1
            End If
        End IfEnd Sub
      

  20.   

    请问啊军：
    在你的例子中启动窗体的LOAD里有以下代码，是什么用处？
    Dim a As Menu
    Set a = mnuFile
    Dim b As Collection
      

  21.   

    太怪了，我新建一个工程，把XP菜单加入到窗体，只要是第一次点运行就会出现，运行时错误‘91’未设置对象变量或With block变量。
    点确定后还是可以进入程序，再次运行程序不再会有此提示。
    我的一个已存在的工程，加上这个控件后在第一次运行也出现了此提示。
      

  22.   

    OK
    我试试看.那段代码现在没有用处,是我原来做试验时加的,我忘了给去掉了.
    我的QQ 423270 有时间上来和我即时聊吧,谢谢你.
      

  23.   

    顺便的说,你那段代码里Index是整数,Select Case的Case后面怎么都成了字符串了 ?
      

  24.   

    ajuXuan(阿军)这个XP菜单的原理是什么？从使用上是非常方便。能否把源码共享出来，让大伙学习学习。
      

  25.   

    第六版:
    1.解决CSDN网友clark_rain(谢玉辉) 、 lqtflwg718(九五之尊)提出的与状态条不兼容
    的问题。 
    2.解决在.NET中当菜单的MdiList=Ture时,点开菜单时这个菜单又被系统重新绘制问题。
    　既第四、五版中仍然存在的问题 1。
    3.解决当主菜单项文字改变时的绘制问题。
    4.解决CSDN网友 accpedu(人月神话) 提出的，当在没有安装Visual Studio的机器上发布程序时出现的函数调用错误。修正对TLBINF32.DLL的依赖。
    5.进一步修正问题1，解决在调试状态时还与状态条存在的不兼容问题。
    6.修正CSDN网友 billow_chentao(巨浪) 提出的在控件第一次加到窗体里时出现的运行时错误“91”。
    7.解决在WindowsXP下启用了XP效果后,系统菜单和MDI子窗体最大化后系统按钮会被影响的BUG.效果图地址：
    cbbs/images/upfile/2004824193036.gif下载地址：
    请进入本站论坛下载 
    http://ajusoft.6vv.net
    http://ajusoft.126.com
    http://www.xjpa.com/other/wl/aju
    感谢大家支持！
      

  26.   

    效果图地址：
    http://www.xjpa.com/other/wl/aju/bbs/images/upfile/2004824193036.gif
      

  27.   

    不错，这个版本很稳定！！！使用中，还没有发现问题，谢谢ajuxuan!!!
      

  28.   

    ajuXuan(阿军)：
    最新版的在哪里能下载到呢？
    帮我发一个邮件吧。[email protected]