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

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

标签：

版权申明：本站文章部分自网络，如有侵权，请联系：west999com@outlook.com
特别注意：本站所有转载文章言论不代表本站观点，本站所提供的摄影照片，插画，设计作品，如需使用，请与原作者联系，版权归原作者所有