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

核心提示： 有时候我们经常在程序中实现菜单项的重画，已有好多文章已经加以介绍，在系统菜单里添加菜单项和相应事件，在此不再赘述，但是有时我们需要加新菜单项到系统菜单中，调用父类的方法可完成窗体的激活、定位等与Windows同步的消息处理，重载该方法可改变窗体如何相应Windows的消息，并希望给其增加相应的事件，笔者通过运用Win

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