對(duì)于C++ Builder的程序員來(lái)說(shuō)，VCL以其靈活、高效的特點(diǎn)令人喜愛(ài)。因?yàn)閂CL是在Windows API的基礎(chǔ)上進(jìn)行了封裝，同時(shí)舍棄了一些不常用的功能，所以，VCL在功能上是Windows API 的子集。 VCL提供了對(duì)大多數(shù)Windows消息的處理機(jī)制，但是對(duì)于沒(méi)有處理的Windows消息呢，在需要是如何捕獲呢？C++ Builder采用了消息映射標(biāo)機(jī)制，通過(guò)消息映射表將特定的Windows消息于代碼中的函數(shù)聯(lián)系起來(lái)，當(dāng)窗口捕獲到消息時(shí)就會(huì)調(diào)用這個(gè)函數(shù)。
C++ Builder消息映射表定義形式如下：
BEGIN_MESSAGE_MAP
MESSAGE_HANDLER( , , )
END_MESSAGE_MAP(ClassName)
其中：
BEGIN_MESSAGE_MAP：消息映射定義起始語(yǔ)句
MESSAGE_HANDLER：消息處理定義
END_MESSAGE_MAP：消息映射定義結(jié)束語(yǔ)句
ClassName：是要接受消息的類(lèi)名
message：是要截獲的Windows消息
message handler：消息處理函數(shù)名稱(chēng)
message structure：是用于傳遞給VCL消息的結(jié)構(gòu)名稱(chēng)，此結(jié)構(gòu)里包含有處理消息時(shí)所需的全部參數(shù)，不同的消息所對(duì)應(yīng)的消息結(jié)構(gòu)是不同的。
由于每一個(gè)VCL控件（無(wú)論是窗體還是按鈕）都可以獨(dú)立的接收Windows消息，并且進(jìn)行獨(dú)立的響應(yīng)，所以一定要注意消息定一種的ClassName參數(shù)。
現(xiàn)在舉例說(shuō)明消息定義、傳遞的應(yīng)用?，F(xiàn)在一個(gè)窗體FormMain，和2個(gè)TperformanceGraph控件（不能響應(yīng)鼠標(biāo)事件），現(xiàn)在我要對(duì)2個(gè) TperformanceGraph控件定義鼠標(biāo)單擊事件，對(duì)FormMain也重定義鼠標(biāo)單擊事件，過(guò)程如下（假定工程文件為Message.bpr，程序文件為 main.cpp、main.h）：
源代碼如下：
//----main.h--------------------------------------------------------------
#ifndef mainH
#define mainH
//----------------------------------------------------------
#include
#include
#include
#include
#include "PERFGRAP.h"
//-----------------------------------------------------------
class TFormMain : public TForm
{
__published: // IDE-managed Components
//----2個(gè)標(biāo)準(zhǔn)TperformanceGraph控件
TPerformanceGraph *PerformanceGraph1;
TPerformanceGraph *PerformanceGraph2;
TEdit *Edit2;
TEdit *Edit1;
void __fastcall FormCreate(TObject *Sender);
private: // User declarations
//----自定義的消息處理函數(shù)，其中MESSAGE可以不寫(xiě)
MESSAGE void __fastcall LButtonDown(TMessage &message);
//----用戶(hù)定義的函數(shù)（處理消息，具體使用見(jiàn).cpp文件）
void __fastcall MyWndProc1(TMessage &message);
void __fastcall MyWndProc2(TMessage &message);
//----函數(shù)指針，用來(lái)保存2個(gè)TperformanceGraph控件的消息處理函數(shù)的指針
TWndMethod OldWndProc1 , OldWndProc2;
public: // User declarations
__fastcall TFormMain(TComponent* Owner);
//----窗體的消息定義
BEGIN_MESSAGE_MAP
MESSAGE_HANDLER(WM_LBUTTONDOWN , TMessage , LButtonDown)
END_MESSAGE_MAP(TForm)
};
//---------------------------------------------------------------------------
extern PACKAGE TFormMain *FormMain;
//---------------------------------------------------------------------------
#endif
//----main.cpp------------------------------------------------------------
#include
#pragma hdrstop
#include "main.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "PERFGRAP"
#pragma resource "*.dfm"
TFormMain *FormMain;
//---------------------------------------------------------------------------
__fastcall TFormMain::TFormMain(TComponent* Owner)
: TForm(Owner)
{}
//---------------------------------------------------------------------------
void __fastcall TFormMain::LButtonDown(TMessage &message)
{
//----如果鼠標(biāo)在窗體內(nèi)（控件外）被單擊，則此事件被激活
if(GetAsyncKeyState(VK_LBUTTON) < 0)
{
Application->MessageBoxA("Form Get Messsge" , "Message" , MB_OK);
//----向Edit2發(fā)送鼠標(biāo)消息，則Edit2將產(chǎn)生單擊獲得焦點(diǎn)的現(xiàn)象
SendMessage(FormMain->Edit2->Handle ,
message.Msg ,
message.WParam ,
message.LParam);
}
}
//---------------------------------------------------------------------------
void __fastcall TFormMain::FormCreate(TObject *Sender)
{
//----替換2個(gè)TperformanceGraph控件的消息處理函數(shù)句柄
OldWndProc1 = PerformanceGraph1->WindowProc;
OldWndProc2 = PerformanceGraph2->WindowProc;
PerformanceGraph1->WindowProc = MyWndProc1;
PerformanceGraph2->WindowProc = MyWndProc2;
}
//---------------------------------------------------------------------------
void __fastcall TFormMain::MyWndProc1(TMessage &message)
{
if (message.Msg == WM_LBUTTONDOWN)
//----如果消息是“鼠標(biāo)單擊消息”，則顯示信息
ShowMessage("PerformanceGraph1 Get Message ");
else
//----如果消息是其他消息，則交給控件原來(lái)的處理
OldWndProc1(message);
}
//---------------------------------------------------------------------------
void __fastcall TFormMain::MyWndProc2(TMessage &message)
{
if (message.Msg == WM_LBUTTONDOWN)
ShowMessage("PerformanceGraph 2 get Message");
else
OldWndProc2(message);
}
如果在TFormMain::FormCreate（）函數(shù)中加入以下兩句語(yǔ)句：
OldWndProc3 = FormMain->WindowProc;
FormMain->WindowProc = MyWndProc3;
再添加函數(shù)：
void __fastcall TFormMain::MyWndProc3(TMessage &message)
{
if (message.Msg == WM_LBUTTONDOWN)
//----如果消息是“鼠標(biāo)單擊消息”，則顯示信息
ShowMessage(“FormMain Get the Message ");
else
//----如果消息是其他消息，則交給控件原來(lái)的處理
OldWndProc1(message);
}
則把FormMain的鼠標(biāo)消息響應(yīng)函數(shù)進(jìn)行了改裝，此時(shí)窗體就會(huì)截獲鼠標(biāo)消息，而2個(gè)TperformanceGraph控件將不會(huì)得到消息。這是因?yàn)榇绑w將先于控件得到消息。
從上面的例子可以看出：
1、 窗體將先于控件得到消息；
2、 對(duì)于響應(yīng)某一消息的控件，可以用SendMessage想起發(fā)送消息；
3、 對(duì)于不響應(yīng)某一消息的控件，可以用重載其WindowProc屬性獲得你想要的效果。
實(shí)際上，掌握了利用Windows的消息傳遞機(jī)制才是掌握C++ Builder的第二階段，任重而道遠(yuǎn)。
C++ Builder消息映射表定義形式如下：
BEGIN_MESSAGE_MAP
MESSAGE_HANDLER(
END_MESSAGE_MAP(ClassName)
其中：
BEGIN_MESSAGE_MAP：消息映射定義起始語(yǔ)句
MESSAGE_HANDLER：消息處理定義
END_MESSAGE_MAP：消息映射定義結(jié)束語(yǔ)句
ClassName：是要接受消息的類(lèi)名
message：是要截獲的Windows消息
message handler：消息處理函數(shù)名稱(chēng)
message structure：是用于傳遞給VCL消息的結(jié)構(gòu)名稱(chēng)，此結(jié)構(gòu)里包含有處理消息時(shí)所需的全部參數(shù)，不同的消息所對(duì)應(yīng)的消息結(jié)構(gòu)是不同的。
由于每一個(gè)VCL控件（無(wú)論是窗體還是按鈕）都可以獨(dú)立的接收Windows消息，并且進(jìn)行獨(dú)立的響應(yīng)，所以一定要注意消息定一種的ClassName參數(shù)。
現(xiàn)在舉例說(shuō)明消息定義、傳遞的應(yīng)用?，F(xiàn)在一個(gè)窗體FormMain，和2個(gè)TperformanceGraph控件（不能響應(yīng)鼠標(biāo)事件），現(xiàn)在我要對(duì)2個(gè) TperformanceGraph控件定義鼠標(biāo)單擊事件，對(duì)FormMain也重定義鼠標(biāo)單擊事件，過(guò)程如下（假定工程文件為Message.bpr，程序文件為 main.cpp、main.h）：
源代碼如下：
//----main.h--------------------------------------------------------------
#ifndef mainH
#define mainH
//----------------------------------------------------------
#include
#include
#include
#include
#include "PERFGRAP.h"
//-----------------------------------------------------------
class TFormMain : public TForm
{
__published: // IDE-managed Components
//----2個(gè)標(biāo)準(zhǔn)TperformanceGraph控件
TPerformanceGraph *PerformanceGraph1;
TPerformanceGraph *PerformanceGraph2;
TEdit *Edit2;
TEdit *Edit1;
void __fastcall FormCreate(TObject *Sender);
private: // User declarations
//----自定義的消息處理函數(shù)，其中MESSAGE可以不寫(xiě)
MESSAGE void __fastcall LButtonDown(TMessage &message);
//----用戶(hù)定義的函數(shù)（處理消息，具體使用見(jiàn).cpp文件）
void __fastcall MyWndProc1(TMessage &message);
void __fastcall MyWndProc2(TMessage &message);
//----函數(shù)指針，用來(lái)保存2個(gè)TperformanceGraph控件的消息處理函數(shù)的指針
TWndMethod OldWndProc1 , OldWndProc2;
public: // User declarations
__fastcall TFormMain(TComponent* Owner);
//----窗體的消息定義
BEGIN_MESSAGE_MAP
MESSAGE_HANDLER(WM_LBUTTONDOWN , TMessage , LButtonDown)
END_MESSAGE_MAP(TForm)
};
//---------------------------------------------------------------------------
extern PACKAGE TFormMain *FormMain;
//---------------------------------------------------------------------------
#endif
//----main.cpp------------------------------------------------------------
#include
#pragma hdrstop
#include "main.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "PERFGRAP"
#pragma resource "*.dfm"
TFormMain *FormMain;
//---------------------------------------------------------------------------
__fastcall TFormMain::TFormMain(TComponent* Owner)
: TForm(Owner)
{}
//---------------------------------------------------------------------------
void __fastcall TFormMain::LButtonDown(TMessage &message)
{
//----如果鼠標(biāo)在窗體內(nèi)（控件外）被單擊，則此事件被激活
if(GetAsyncKeyState(VK_LBUTTON) < 0)
{
Application->MessageBoxA("Form Get Messsge" , "Message" , MB_OK);
//----向Edit2發(fā)送鼠標(biāo)消息，則Edit2將產(chǎn)生單擊獲得焦點(diǎn)的現(xiàn)象
SendMessage(FormMain->Edit2->Handle ,
message.Msg ,
message.WParam ,
message.LParam);
}
}
//---------------------------------------------------------------------------
void __fastcall TFormMain::FormCreate(TObject *Sender)
{
//----替換2個(gè)TperformanceGraph控件的消息處理函數(shù)句柄
OldWndProc1 = PerformanceGraph1->WindowProc;
OldWndProc2 = PerformanceGraph2->WindowProc;
PerformanceGraph1->WindowProc = MyWndProc1;
PerformanceGraph2->WindowProc = MyWndProc2;
}
//---------------------------------------------------------------------------
void __fastcall TFormMain::MyWndProc1(TMessage &message)
{
if (message.Msg == WM_LBUTTONDOWN)
//----如果消息是“鼠標(biāo)單擊消息”，則顯示信息
ShowMessage("PerformanceGraph1 Get Message ");
else
//----如果消息是其他消息，則交給控件原來(lái)的處理
OldWndProc1(message);
}
//---------------------------------------------------------------------------
void __fastcall TFormMain::MyWndProc2(TMessage &message)
{
if (message.Msg == WM_LBUTTONDOWN)
ShowMessage("PerformanceGraph 2 get Message");
else
OldWndProc2(message);
}
如果在TFormMain::FormCreate（）函數(shù)中加入以下兩句語(yǔ)句：
OldWndProc3 = FormMain->WindowProc;
FormMain->WindowProc = MyWndProc3;
再添加函數(shù)：
void __fastcall TFormMain::MyWndProc3(TMessage &message)
{
if (message.Msg == WM_LBUTTONDOWN)
//----如果消息是“鼠標(biāo)單擊消息”，則顯示信息
ShowMessage(“FormMain Get the Message ");
else
//----如果消息是其他消息，則交給控件原來(lái)的處理
OldWndProc1(message);
}
則把FormMain的鼠標(biāo)消息響應(yīng)函數(shù)進(jìn)行了改裝，此時(shí)窗體就會(huì)截獲鼠標(biāo)消息，而2個(gè)TperformanceGraph控件將不會(huì)得到消息。這是因?yàn)榇绑w將先于控件得到消息。
從上面的例子可以看出：
1、 窗體將先于控件得到消息；
2、 對(duì)于響應(yīng)某一消息的控件，可以用SendMessage想起發(fā)送消息；
3、 對(duì)于不響應(yīng)某一消息的控件，可以用重載其WindowProc屬性獲得你想要的效果。
實(shí)際上，掌握了利用Windows的消息傳遞機(jī)制才是掌握C++ Builder的第二階段，任重而道遠(yuǎn)。