在系统菜单里添加菜单项和相应事件

---- 有时候我们经常在程序中实现菜单项的重画，已有好多文章已经加以介绍，在此不再赘述。但是有时我们需要加新菜单项到系统菜单中，并希望给其增加相应的事件。笔者通过运用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);
}