程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> C語言 >> VC >> vc教程 >> C++Builder定制系統菜單

C++Builder定制系統菜單

編輯:vc教程

通常在應用程序的主窗體中,利用鼠標左鍵點擊左上角的圖標,會彈出一個菜單,稱之為“系統菜單”。

在窗體中並沒有菜單對應的組件,所以有時我們需要定制系統菜單時就比較麻煩。具體可以能過下面的步驟實現:

.在系統菜單上添加所需的菜單項。

.為新添加的菜單項定義OnClick事件的處理過程。

下面的例程中,在系統菜單中添加了一個“前端顯示(A)”菜單項,通過該菜單項,可以使窗體始終顯示在最前端或為普通窗體模式。具體實現過程如下:

1)通過菜單File|New Application創建一個新的工程。

2)添加窗體Form1的OnClick事件的處理過程如下:

void _fastcall TForm1::FormCreate(Tobject *Sender)
{
  //設置系統菜單
  AppendMenu(GetSystemMenu(Handle,false),MF_SEPARATOR,0,"");
  AppendMenu(GetSystemMenu(Handle,false),MF_STRING,200,"前端顯示(&A)");
}

3)在文件Unit1.h頭文件中增加如下語句:

...
#include<Menus.hpp>
...

4)在TForm1的類型定義中,添加系統菜單中新建菜單項的OnClick事件的處理過程的聲明:

...
public:    //User declarations
   __fastcall TForm1(TComponent *Owner);
   MESSAGE void __fastcall SystemMenuCommand(TWMMenuSelect &Msg);
BEGIN_MESSAGE_MAP
   MESSAGE_HANDLER(WM_SYSCOMMAND,TWMMenuSelect,SysteMenuCommand);
END_MESSAGE_MAP(TForm);
};

5)手工添加系統菜單中新建菜單項的OnClick事件的處理過程如下:

void __fastcall TForm1::SystemMenuCommand(TWMMenuSelect &Msg)
{
  TForm::Dispatch(&Msg);
  if(Msg.IDItem==200)
  {
   if(Form1->FormStyle==fsNormal)
   {
    //將窗體設置為總在前端顯示
    Form1->FormStyle=fsStayOnTop;
    //重新設置系統菜單
    AppendMenu(GetSystemMenu(Handle,false),MF_SEPARATOR,0,"");
    AppendMenu(GetSystemMenu(Handle,false),MF_STRING,200,"前端顯示(&A)");
    //在新添加的菜單項前增加一個選中標志
    ModifyMenu(GetSystemMenu(Handle,false),200,MF_CHECKED,200,"前端顯示(&A)");
   }
  }
  else
  {
   //將窗體設置為普通模式
   Form1->FormStyle=fsNormal;
   重新設置系統菜單
   AppendMenu(GetSystemMenu(Handle,false),MF_SEPARATOR,0,"");
   AppendMenu(GetSystemMenu(Handle,false),MF_STRING,200,"前端顯示(&A)");
  {
}

  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved