## 在系统菜单里添加菜单项和相应事件 ### 东北财经大学研究生部绍青 ---- 有时候我们经常在程序中实现菜单项的重画，已有好多文章已经加以介绍，在此不再赘述。但是有时我们需要加新菜单项到系统菜单中，并希望给其增加相应的事件。笔者通过运用WindowAPI的AppendMenu函数和C++BUIDER的相关方法、属性，实现了往系统菜单中增加菜单项和事件。 ---- 下面介绍具体的实现方法，读者按照以下步骤操作，就可以实现在系统菜单中增加菜单项和事件： ---- 1 首先创建一个新的空工程文件，存盘为project1.cpp和unit1.cpp。 ---- 2 使用菜单Tools中的Image Editor，打开资源文件project1，新建一个位图并取名为HELP。 ---- 3 在源文件头部定义如下常量作为菜单的标示：
          #define IDM_HELP1      1

          #define IDM_HELP2      2

          #define IDM_REMOVE     3

          #define IDM_SEPARATOR1 4

          #define IDM_SEPARATOR2 5
---- 4 为Form1创建OnCreate事件，添加代码实现在系统菜单里增加菜单项：
    首先定义菜单句柄和位图句柄：

        HMENU hMenu;

        HBITMAP  hBitmapHelp;

        然后获得系统菜单的句柄：

        hMenu = GetSystemMenu (this- >Handle, FALSE) ;

        往系统菜单中增加自己的菜单项：

        AppendMenu (hMenu, MF_SEPARATOR,

    	IDM_SEPARATOR1,  NULL) ;

        AppendMenu (hMenu, MF_STRING,

    	IDM_HELP1,"帮助") ;

        AppendMenu (hMenu, MF_SEPARATOR,

    	IDM_SEPARATOR2,  NULL) ;

        AppendMenu (hMenu, MF_STRING,

    	IDM_REMOVE,"取消菜单") ;

        往菜单中添加位图，首先装载位图资源，

    	获得其句柄，然后将它添加到系统菜单中：

        hBitmapHelp =LoadBitmap ((void*)

    	HInstance, "HELP");

        AppendMenu (hMenu, MF_BITMAP,IDM

    	_HELP2,  (char*)hBitmapHelp);
---- 5 在头文件的public下面添加方法MyWndProc的定义：
    void __fastcall MyWndProc(Messages::TMessage &Message);
---- 6 在构造函数中加入WindowProc=MyWndProc代码，以重载WndProc方法，完成用户自己所要求的操作。 ---- 7 在源文件里面添加MyWndProc的实现： ---- 首先获得系统菜单的句柄，为动态修改菜单项做准备。
    HMENU hMenu;

    hMenu = GetSystemMenu (this- >Handle, FALSE);
---- 判断当前消息是否为系统命令消息，若是，则重新实现它，再判断消息的WparamLo参数是否为在OnCreate事件中添加的菜单项，若是，进行相应事件处理，如不是按系统默认执行；若是其他消息则执行系统默认的代码。
      if (Message.Msg == WM_SYSCOMMAND)

      {

         switch(Message.WParamLo)

         {

            case IDM_HELP1:

                ShowMessage("这是一个测试！");

                break;

            case IDM_HELP2:

                ShowMessage("这是一个测试！");

                break;

            case IDM_REMOVE:

            {

             //删除添加到系统菜单的菜单项

    DeleteMenu(hMenu,IDM_HELP1,MF_BYCOMMAND);

    DeleteMenu(hMenu,IDM_HELP2,MF_BYCOMMAND);

    DeleteMenu(hMenu,IDM_REMOVE,MF_BYCOMMAND);

    DeleteMenu(hMenu,IDM_SEPARATOR1,MF_BYCOMMAND);

     DeleteMenu(hMenu,IDM_SEPARATOR2,MF_BYCOMMAND);

            }

            default:

               WndProc(Message);

       }

     }

    else

        WndProc(Message);
---- 接下来调试运行程序，本程序在C++builder 4.0下调试通过。 ---- 下面介绍一下实现的技术内幕。往系统菜单中增加菜单项的关键就是获得系统菜单的句柄，在程序中使用Window API函数GetSysMenu，然后用AppendMenu增加菜单。函数的相关用法可查阅C++Builder联机帮助。给菜单项添加相应的事件，我们用到了TForm类的WindowProc属性，把用户自定义的方法代替系统自己的 WndProc方法。WindowProc属性指向一个被送往窗体的消息的处理过程，是我们能够在程序中重载WndProc方法。WndProc方法是窗体中第一个接收到消息的方法，调用父类的方法可完成窗体的激活、定位等与Windows同步的消息处理。重载该方法可改变窗体如何相应Windows的消息。本文程序就是运用两者的配合实现了给系统菜单添加相应事件的。 ---- 附程序清单：
    1 unit1.h

    /---------------------------------------------------------

    #ifndef Unit1H

    #define Unit1H

    //--------------------------------------------------------

    #include < Classes.hpp >

    #include < Controls.hpp >

    #include < StdCtrls.hpp >

    #include < Forms.hpp >

    #include < Db.hpp >

    #include < DBGrids.hpp >

    #include < DBTables.hpp >

    #include < Grids.hpp >

    //----------------------------------------------------------

    class TForm1 : public TForm

    {

    __published:	// IDE-managed Components

            void __fastcall FormCreate(TObject *Sender);

    	// User declarations

    public:		// User declarations

             __fastcall TForm1(TComponent* Owner);

             void __fastcall MyWndProc(Messages

    		 ::TMessage &Message);

    protected:

    };

    //--------------------------------------------------------------

    extern PACKAGE TForm1 *Form1;

    //---------------------------------------------------------------

    #endif

    2 unit1.cpp

    //---------------------------------------------------------------

    #include < vcl.h >

    #pragma hdrstop

    #include "Unit1.h"

    //-----------------------------------------------------------------

    #pragma package(smart_init)

    #pragma resource "*.dfm"

    #define IDM_HELP1   1

    #define IDM_HELP2   2

    #define IDM_REMOVE  3

    #define IDM_SEPARATOR1 4

    #define IDM_SEPARATOR2 5

    TForm1 *Form1;

    //---------------------------------------------------------------

    __fastcall TForm1::TForm1(TComponent* Owner)

            : TForm(Owner)

    {

      WindowProc=MyWndProc;

    }

    //--------------------------------------------------------------

    void __fastcall TForm1::FormCreate(TObject *Sender)

    {

       HMENU hMenu;

       HBITMAP  hBitmapHelp;

       hMenu = GetSystemMenu (this- >

       Handle, FALSE) ;

       AppendMenu (hMenu, MF_SEPARATOR,

       IDM_SEPARATOR1,  NULL) ;

       AppendMenu (hMenu, MF_STRING,

       IDM_HELP1,"帮助") ;

       hBitmapHelp =LoadBitmap ((void*)

       HInstance, "HELP");

       AppendMenu (hMenu, MF_BITMAP,

       IDM_HELP2,  (char*)hBitmapHelp);

       AppendMenu (hMenu, MF_SEPARATOR,

       IDM_SEPARATOR2,  NULL) ;

       AppendMenu (hMenu, MF_STRING,

       IDM_REMOVE,"取消菜单") ;

    }

    //---------------------------------------------------------

    void __fastcall TForm1::MyWndProc

    (Messages::TMessage &Message)

    {

      HMENU hMenu;

      hMenu = GetSystemMenu (this- >Handle, FALSE);

      if (Message.Msg == WM_SYSCOMMAND)

      {

         switch(Message.WParamLo)

         {

            case IDM_HELP1:

                ShowMessage("这是一个测试！");

                break;

            case IDM_HELP2:

                ShowMessage("这是一个测试！");

                break;

            case IDM_REMOVE:

            {

              DeleteMenu(hMenu,IDM_HELP1,MF_BYCOMMAND);

              DeleteMenu(hMenu,IDM_HELP2,MF_BYCOMMAND);

              DeleteMenu(hMenu,IDM_REMOVE,MF_BYCOMMAND);

              DeleteMenu(hMenu,IDM_SEPARATOR1,MF_BYCOMMAND);

              DeleteMenu(hMenu,IDM_SEPARATOR2,MF_BYCOMMAND);

            }

            default:

               WndProc(Message);

       }

     }

    else

        WndProc(Message);

    }