攔截Windows消息
2019-09-06 23:33:52
供稿：網(wǎng)友
---- Borland C++ Builder的API后門
---- 引子
---- C++ Builder不愧為Borland公司的優(yōu)秀產(chǎn)品，用它來開發(fā)Windows程序非常快捷高效，但在編程過程中你也會(huì)發(fā)現(xiàn)它的一些限制性，讓你無法實(shí)現(xiàn)自己的想法。比如你無法在修改表單的系統(tǒng)菜單；比如使用跟蹤欄時(shí)，你找不到StartTrack和EndTrack事件，而偏偏你的程序需要這兩個(gè)事件。Windows API編程中，你就不會(huì)有這些麻煩，只需處理一下WM_SYSCOMMAND和WM_HSCROLL(或WM_VSCROLL)消息，就能實(shí)現(xiàn)上述功能。Windows API的缺點(diǎn)是編程十分麻煩，太多的時(shí)間要耗在細(xì)節(jié)上面，但它的功能卻是最強(qiáng)大的。C++ Builder的VCL在功能上只是它的一個(gè)子集，因?yàn)閂CL是在API的基礎(chǔ)上封裝的，封裝時(shí)舍棄了一些不常用到的功能。但是程序員的想象力沒有被封裝，他們總懷著更大的熱情去實(shí)現(xiàn)別出心裁的想法，修改系統(tǒng)菜單和給跟蹤欄增加StartTrack和ndTrack事件只是其中的小把戲而已。可是VCL并沒有這些功能，怎么辦？
---- 幸好，Borland公司沒有把路堵死，而是留了個(gè)后門允許程序員自己攔截并處理Windows消息，就象API編程一樣。于是，辦法有了...
---- 方法
---- 攔截Windows消息需要以下幾步：
---- 在表單頭文件內(nèi)(如Unit1.h)
---- 1. 在類聲明中建立消息映射表，把某條消息的處理權(quán)交給自定義的消息處理函數(shù)。
BEGIN_MESSAGE_MAP
MESSAGE_HANDLER(Windows消息名，TMessage，消息處理函數(shù)名)
MESSAGE_HANDLER(...)
END_MESSAGE_MAP（TForm）
---- 2. 在類聲明的private區(qū)內(nèi)聲明消息處理函數(shù)。
private: // User declarations
void __fastcall 消息處理函數(shù)名(TMessage &Message)；
在表單文件內(nèi)（如Unit1.cpp）
---- 3. 寫出消息處理函數(shù)，在這里實(shí)現(xiàn)你需要的功能。比如
void __fastcall MainForm::OnWMHScroll (TMessage &Message)
{
... // 在此加入你自己的代碼
TForm::Dispatch(&Message);
}
---- 解釋
---- 1. 關(guān)于TMessage
---- TMessage是VCL預(yù)定義的結(jié)構(gòu)，定義如下：
struct TMessage
{
unsigned int Msg; //消息
int WParam; //字參數(shù)
int LParam; //長(zhǎng)字參數(shù)
int Result; //消息結(jié)果
};
---- 2. 關(guān)于TForm::Dispatch(&Message)
---- 自定義的消息處理函數(shù)末尾最好加一句TForm::Dispatch(&Message)，這一句的作用是讓消息繼續(xù)傳遞下去。如果沒有這一句，消息將被完全攔截，VCL類可能由于得不到消息而無法實(shí)現(xiàn)正常功能。
---- 實(shí)例一：修改系統(tǒng)菜單
---- 有一些程序，主窗口很小，菜單也沒有，如果想加入關(guān)于或設(shè)置對(duì)話框，最好的辦法是拿系統(tǒng)菜單開刀。Windows API編程中，修改系統(tǒng)菜單與實(shí)現(xiàn)其他功能一樣，不太容易，也不會(huì)太難。但在C++ Builder中，表單類(TForm)沒有提供有關(guān)系統(tǒng)菜單的任何屬性與方法，實(shí)現(xiàn)其他功能易如反掌，而修改系統(tǒng)菜單似乎難于上青天。
---- 還好，Borland公司允許程序員自已處理Window消息，于是機(jī)會(huì)來了！
一、用Window API函數(shù)修改系統(tǒng)菜單
假定表單名為MainForm，設(shè)置MainForm::OnCreate()函數(shù)：
1. 用GetSystemMenu(MainForm->Handle,false)取得系統(tǒng)菜單句柄；
2. 用AppendMenu,DeleteMenu,ModifyMenu函數(shù)修改系統(tǒng)菜單，把新的ID號(hào)賦于自定義的菜單項(xiàng)。
這時(shí)運(yùn)行程序，可以看到系統(tǒng)菜單也被修改，但自定義的菜單項(xiàng)卻不能被響應(yīng)。
二、攔截WM_SYSCOMMAND消息以響應(yīng)自定義的菜單項(xiàng)
在表單頭文件內(nèi)(如Unit1.h)
1. 在表單類定義末尾加入消息響應(yīng)表，取得WM_SYSCOMMAND消息的處理權(quán)
BEGIN_MESSAGE_MAP
MESSAGE_HANDLER(WM_SYSCOMMAND,TMessage,OnWMSysCommand)
END_MESSAGE_MAP(TForm)
2. 在表單類定義的private區(qū)內(nèi)加入消息處理函數(shù)聲明
private: // User declarations
void __fastcall OnWMSysCommand(TMessage& Message);
在表單文件內(nèi)(如Unit1.h)
3. 寫出消息響應(yīng)函數(shù)
void __fastcall TForm1::OnWMSysCommand(TMessage& Message)
{
if(Message.WParam==ID_SysMenu_MyItem)
{
// Your Code Here, Do Something
}
TForm::Dispatch(&Message);
}
三、完整程序示例
實(shí)例二：給跟蹤欄增加OnStartTrack和OnEndTrack事件
當(dāng)跟蹤欄用于進(jìn)度控制時(shí)，OnStartTrack和OnEndTrack很可能是你需要的事件。比如在控制多媒體播放進(jìn)度的場(chǎng)合，當(dāng)用戶移動(dòng)滑塊時(shí)，你需要OnStartTrack事件讓播放停止，需要OnEndTrack事件定位新的播放位置。但Borland公司沒有提供這兩個(gè)事件，我等編程愛好者只好自力更生，打攔截Windows消息的主意了。
一、攔截WM_HSCROLL消息，給跟蹤欄增加OnStartTrack和OnEndTrack事件
在表單頭文件內(nèi)（如Unit.h）
1. 在表單類定義末尾加入消息響應(yīng)表，把WM_HSCROLL消息處理權(quán)交給OnWMHScroll函數(shù)。
BEGIN_MESSAGE_MAP
MESSAGE_HANDLER(WM_HSCROLL,TMessage,OnWMHScroll)
END_MESSAGE_MAP(TForm)
2. 在表單類定義的private區(qū)內(nèi)加入OnWMHScroll函數(shù)聲明。
private: // User declarations
void __fastcall OnWMHScroll(TMessage &Message);
3. 在表單類定義的private區(qū)內(nèi)加入StartTrack和EndTrack函數(shù)聲明。
private: // User declarations
void __fastcall TrackBar1StartTrack(TObject *Sender);
void __fastcall TrackBar1EndTrack(TObject *Sender);
在表單文件內(nèi)（如Unit.cpp）
4. 寫出OnWMHScroll函數(shù)，使它能根據(jù)消息參數(shù)調(diào)用StartTrack和EndTrack函數(shù)，在實(shí)際意義上產(chǎn)生OnStartTrack和OnEndTrack事件。
5. 寫出StartTrack和EndTrack函數(shù)。
如果是垂直跟蹤欄，把上面的WM_HSCROLL改為WM_VSCROLL即可。
二、完整程序示例
尾聲
Borland C++ Builder編程中，攔截Windows消息是一項(xiàng)高級(jí)編程技術(shù)，能讓你盡量挖掘Windows的潛力，尤其讓曾用API編程的程序員感到心慰。攔截Windows消息是API盡情發(fā)揮的舞臺(tái)，當(dāng)VCL不能為你做什么時(shí)，請(qǐng)想起底層的API。
