[推薦]攔截Windows Message |
|
axsoft
版主 ![]() ![]() ![]() ![]() ![]() ![]() 發表:681 回覆:1056 積分:969 註冊:2002-03-13 發送簡訊給我 |
攔截Windows Message浙江省溫州市統計局 倪建春 ----Borland C Builder的API後門 資料來源:http://go5.163.com/yarrows/tips/cbc_13.htm![]() 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。 ![]() |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |