攔截Windows消息

2019-11-17 05:19:46

字體：大中小

來源：轉載

供稿：網友

　　---- Borland C++ Builder的API后門

---- 引子

---- C++ Builder不愧為Borland公司的優秀產品，用它來開發Windows程序非?？旖莞咝В诰幊踢^程中你也會發現它的一些限制性，讓你無法實現自己的想法。比如你無法在修改表單的系統菜單；比如使用跟蹤欄時，你找不到StartTrack和EndTrack事件，而偏偏你的程序需要這兩個事件。Windows API編程中，你就不會有這些麻煩，只需處理一下WM_SYSCOMMAND和WM_HSCROLL(或WM_VSCROLL)消息，就能實現上述功能。Windows API的缺點是編程十分麻煩，太多的時間要耗在細節上面，但它的功能卻是最強大的。C++ Builder的VCL在功能上只是它的一個子集，因為VCL是在API的基礎上封裝的，封裝時舍棄了一些不常用到的功能。但是程序員的想象力沒有被封裝，他們總懷著更大的熱情去實現別出心裁的想法，修改系統菜單和給跟蹤欄增加StartTrack和ndTrack事件只是其中的小把戲而已?？墒荲CL并沒有這些功能，怎么辦？

---- 幸好，Borland公司沒有把路堵死，而是留了個后門——答應程序員自己攔截并處理Windows消息，就象API編程一樣。于是，辦法有了...

---- 方法

---- 攔截Windows消息需要以下幾步：
---- 在表單頭文件內(如Unit1.h)
---- 1. 在類聲明中建立消息映射表，把某條消息的處理權交給自定義的消息處理函數。

BEGIN_MESSAGE_MAP
MESSAGE_HANDLER(Windows消息名，TMessage，消息處理函數名)
MESSAGE_HANDLER(...)
END_MESSAGE_MAP（TForm）

---- 2. 在類聲明的PRivate區內聲明消息處理函數。

private: // User declarations
void __fastcall 消息處理函數名(TMessage &Message)；
在表單文件內（如Unit1.cpp）

---- 3. 寫出消息處理函數，在這里實現你需要的功能。比如
void __fastcall MainForm::OnWMHScroll (TMessage &Message)
{
... // 在此加入你自己的代碼
TForm::Dispatch(&Message);
}

---- 解釋

---- 1. 關于TMessage

---- TMessage是VCL預定義的結構，定義如下：
strUCt TMessage
{
unsigned int Msg; //消息
int WParam; //字參數
int LParam; //長字參數
int Result; //消息結果
};

---- 2. 關于TForm::Dispatch(&Message)

---- 自定義的消息處理函數末尾最好加一句TForm::Dispatch(&Message)，這一句的作用是讓消息繼續傳遞下去。假如沒有這一句，消息將被完全攔截，VCL類可能由于得不到消息而無法實現正常功能。

---- 實例一：修改系統菜單

---- 有一些程序，主窗口很小，菜單也沒有，假如想加入關于或設置對話框，最好的辦法是拿系統菜單開刀。Windows API編程中，修改系統菜單與實現其他功能一樣，不太輕易，也不會太難。但在C++ Builder中，表單類(TForm)沒有提供有關系統菜單的任何屬性與方法，實現其他功能易如反掌，而修改系統菜單似乎難于上青天。

---- 還好，Borland公司答應程序員自已處理Window消息，于是機會來了！

一、用Window API函數修改系統菜單

假定表單名為MainForm，設置MainForm::OnCreate()函數：

1. 用GetSystemMenu(MainForm->Handle,false)取得系統菜單句柄；

2. 用AppendMenu,DeleteMenu,ModifyMenu函數修改系統菜單，把新的ID號賦于自定義的菜單項。
這時運行程序，可以看到系統菜單也被修改，但自定義的菜單項卻不能被響應。

二、攔截WM_SYSCOMMAND消息以響應自定義的菜單項
在表單頭文件內(如Unit1.h)

1. 在表單類定義末尾加入消息響應表，取得WM_SYSCOMMAND消息的處理權
BEGIN_MESSAGE_MAP
MESSAGE_HANDLER(WM_SYSCOMMAND,TMessage,OnWMSysCommand)
END_MESSAGE_MAP(TForm)

2. 在表單類定義的private區內加入消息處理函數聲明
private: // User declarations
void __fastcall OnWMSysCommand(TMessage& Message);

在表單文件內(如Unit1.h)

3. 寫出消息響應函數
void __fastcall TForm1::OnWMSysCommand(TMessage& Message)
{
if(Message.WParam==ID_SysMenu_MyItem)
{
// Your Code Here, Do Something
}
TForm::Dispatch(&Message);
}

三、完整程序示例

實例二：給跟蹤欄增加OnStartTrack和OnEndTrack事件

當跟蹤欄用于進度控制時，OnStartTrack和OnEndTrack很可能是你需要的事件。比如在控制多媒體播放進度的場合，當用戶移動滑塊時，你需要OnStartTrack事件讓播放停止，需要OnEndTrack事件定位新的播放位置。但Borland公司沒有提供這兩個事件，我等編程愛好者只好自力更生，打攔截Windows消息的主意了。

一、攔截WM_HSCROLL消息，給跟蹤欄增加OnStartTrack和OnEndTrack事件

在表單頭文件內（如Unit.h）

1. 在表單類定義末尾加入消息響應表，把WM_HSCROLL消息處理權交給OnWMHScroll函數。
BEGIN_MESSAGE_MAP
MESSAGE_HANDLER(WM_HSCROLL,TMessage,OnWMHScroll)
END_MESSAGE_MAP(TForm)

2. 在表單類定義的private區內加入OnWMHScroll函數聲明。
private: // User declarations
void __fastcall OnWMHScroll(TMessage &Message);

3. 在表單類定義的private區內加入StartTrack和EndTrack函數聲明。
private: // User declarations
void __fastcall TrackBar1StartTrack(TObject *Sender);
void __fastcall TrackBar1EndTrack(TObject *Sender);

在表單文件內（如Unit.cpp）

4. 寫出OnWMHScroll函數，使它能根據消息參數調用StartTrack和EndTrack函數，在實際意義上產生OnStartTrack和OnEndTrack事件。

5. 寫出StartTrack和EndTrack函數。

假如是垂直跟蹤欄，把上面的WM_HSCROLL改為WM_VSCROLL即可。

二、完整程序示例

尾聲

Borland C++ Builder編程中，攔截Windows消息是一項高級編程技術，能讓你盡量挖掘Windows的潛力，尤其讓曾用API編程的程序員感到心慰。攔截Windows消息是API盡情發揮的舞臺，當VCL不能為你做什么時，請想起底層的API。

上一篇：高質量C++/C編程指南 -- 第5章 常量

下一篇：如何捕獲VCL沒有處理的Windows消息