學(xué)習(xí)C++Builder的資料真的很少，下面是從一本書(shū)中學(xué)到的，不知對(duì)大家有沒(méi)有幫助，拿出來(lái)給大家看看：
通常在應(yīng)用程序的主窗體中，利用鼠標(biāo)左鍵點(diǎn)擊左上角的圖標(biāo)，會(huì)彈出一個(gè)菜單，稱(chēng)之為“系統(tǒng)菜單”。
在窗體中并沒(méi)有系統(tǒng)菜單對(duì)應(yīng)的組件，所以有時(shí)我們需要定制系統(tǒng)菜單時(shí)就比較麻煩。具體可以能過(guò)下面的步驟實(shí)現(xiàn)：
.在系統(tǒng)菜單上添加所需的菜單項(xiàng)?！ ?
.為新添加的菜單項(xiàng)定義OnClick事件的處理過(guò)程。
下面的例程中，在系統(tǒng)菜單中添加了一個(gè)“前端顯示（A）”菜單項(xiàng)，通過(guò)該菜單項(xiàng)，可以使窗體始終顯示在最前端或?yàn)槠胀ù绑w模式。具體實(shí)現(xiàn)過(guò)程如下：
1）通過(guò)菜單File New Application創(chuàng)建一個(gè)新的工程。
2）添加窗體Form1的OnClick事件的處理過(guò)程如下：
void _fastcall TForm1::FormCreate(Tobject *Sender)
{
//設(shè)置系統(tǒng)菜單
AppendMenu(GetSystemMenu(Handle,false),MF_SEPARATOR,0,"");
AppendMenu(GetSystemMenu(Handle,false),MF_STRING,200,"前端顯示(&A)");
}
3）在文件Unit1.h頭文件中增加如下語(yǔ)句：
...
#include
...
4）在TForm1的類(lèi)型定義中，添加系統(tǒng)菜單中新建菜單項(xiàng)的OnClick事件的處理過(guò)程的聲明：
...
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）手工添加系統(tǒng)菜單中新建菜單項(xiàng)的OnClick事件的處理過(guò)程如下：
void __fastcall TForm1::SystemMenuCommand(TWMMenuSelect Msg)
{
TForm::Dispatch(Msg);
if(Msg.IDItem==200)
{
if(Form1->FormStyle==fsNormal)
{
//將窗體設(shè)置為總在前端顯示
Form1->FormStyle=fsStayOnTop;
//重新設(shè)置系統(tǒng)菜單
AppendMenu(GetSystemMenu(Handle,false),MF_SEPARATOR,0,"");
AppendMenu(GetSystemMenu(Handle,false),MF_STRING,200,"前端顯示(&A)");
//在新添加的菜單項(xiàng)前增加一個(gè)選中標(biāo)志
ModifyMenu(GetSystemMenu(Handle,false),200,MF_CHECKED,200,"前端顯示(&A)");
}
}
else
{
//將窗體設(shè)置為普通模式
Form1->FormStyle=fsNormal;
重新設(shè)置系統(tǒng)菜單
AppendMenu(GetSystemMenu(Handle,false),MF_SEPARATOR,0,"");
AppendMenu(GetSystemMenu(Handle,false),MF_STRING,200,"前端顯示(&A)");
{
}
