⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 lc_bcb_32.html

📁 C++Builder教学大全
💻 HTML
字号:
🔍 
<html>



<head>

<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<meta name="Author" content="zyqsj">

<title>拦 截 Windows 消 息</title>

</head>



<body>



<p align="center"><font size="5"><strong>拦 截 Windows 消 息</strong></font></p> 

 

<p align="center">浙江省温州市统计局 &nbsp;&nbsp; 倪建春&nbsp; <br> 

&nbsp; <br> 

-&nbsp;--Borland C++ Builder的API后门 <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

<br> 

---- 引子 </p> 

 

<p>---- C++ Builder不愧为Borland公司的优秀产品，用它来开发Windows程序非常快捷高效，但在编程过程中你也会发现它的一些限制性，让你无法实现自己的想法。比如你无法在修改表单的系统菜单；比如使用跟踪栏时，你找不到StartTrack和EndTrack事件，而偏偏你的程序需要这两个事件。Windows  

API编程中，你就不会有这些麻烦，只需处理一下WM_SYSCOMMAND和WM_HSCROLL(或WM_VSCROLL)消息，就能实现上述功能。Windows  

API的缺点是编程十分麻烦，太多的时间要耗在细节上面，但它的功能却是最强大的。C++  

Builder的VCL在功能上只是它的一个子集，因为VCL是在API的基础上封装的，封装时舍弃了一些不常用到的功能。但是程序员的想象力没有被封装，他们总怀着更大的热情去实现别出心裁的想法，修改系统菜单和给跟踪栏增加StartTrack和ndTrack事件只是其中的小把戏而已。可是VCL并没有这些功能，怎么办？  

</p> 

 

<p>---- 幸好，Borland公司没有把路堵死，而是留了个后门——允许程序员自己拦截并处理Windows消息，就象API编程一样。于是，办法有了...  

</p> 

 

<p>---- 方法 </p> 

 

<p>---- 拦截Windows消息需要以下几步： <br> 

---- 在表单头文件内(如Unit1.h) <br> 

---- 1.  

在类声明中建立消息映射表，把某条消息的处理权交给自定义的消息处理函数。  

</p> 

 

<p>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

BEGIN_MESSAGE_MAP <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

MESSAGE_HANDLER(Windows消息名，TMessage，消息处理函数名) <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

MESSAGE_HANDLER(...) <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

END_MESSAGE_MAP（TForm） <br> 

&nbsp; </p> 

 

<p>---- 2. 在类声明的private区内声明消息处理函数。 </p> 

 

<p>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

private:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; // User declarations <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

void __fastcall 消息处理函数名(TMessage &amp;Message)； <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

在表单文件内（如Unit1.cpp） <br> 

&nbsp; </p> 

 

<p>---- 3. 写出消息处理函数，在这里实现你需要的功能。比如 <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

void __fastcall MainForm::OnWMHScroll (TMessage &amp;Message) <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

{ <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

...&nbsp;&nbsp;&nbsp; // 在此加入你自己的代码 <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

TForm::Dispatch(&amp;Message); <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

} <br> 

&nbsp; </p> 

 

<p>---- 解释 </p> 

 

<p>---- 1. 关于TMessage </p> 

 

<p>---- TMessage是VCL预定义的结构，定义如下： <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

struct TMessage <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

{ <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

unsigned int Msg;&nbsp; //消息 <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

int WParam;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; //字参数 <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

int LParam;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; //长字参数 <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

int Result;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; //消息结果 <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

}; <br> 

&nbsp; </p> 

 

<p>---- 2. 关于TForm::Dispatch(&amp;Message) </p> 

 

<p>---- 自定义的消息处理函数末尾最好加一句TForm::Dispatch(&amp;Message)，这一句的作用是让消息继续传递下去。如果没有这一句，消息将被完全拦截，VCL类可能由于得不到消息而无法实现正常功能。  

</p> 

 

<p>---- 实例一：修改系统菜单 </p> 

 

<p>----  

有一些程序，主窗口很小，菜单也没有，如果想加入关于或设置对话框，最好的办法是拿系统菜单开刀。Windows  

API编程中，修改系统菜单与实现其他功能一样，不太容易，也不会太难。但在C++  

Builder中，表单类(TForm)没有提供有关系统菜单的任何属性与方法，实现其他功能易如反掌，而修改系统菜单似乎难于上青天。  

</p> 

 

<p>---- 还好，Borland公司允许程序员自已处理Window消息，于是机会来了！  

</p> 

 

<p>一、用Window API函数修改系统菜单 </p> 

 

<p>&nbsp;&nbsp; 假定表单名为MainForm，设置MainForm::OnCreate()函数： </p> 

 

<p>&nbsp;&nbsp;&nbsp; 1. 用GetSystemMenu(MainForm-&gt;Handle,false)取得系统菜单句柄；  

</p> 

 

<p>&nbsp;&nbsp;&nbsp; 2. 用AppendMenu,DeleteMenu,ModifyMenu函数修改系统菜单，把新的ID号赋于自定义的菜单项。  

<br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

这时运行程序，可以看到系统菜单也被修改，但自定义的菜单项却不能被响应。  

</p> 

 

<p>二、拦截WM_SYSCOMMAND消息以响应自定义的菜单项 <br> 

&nbsp;&nbsp;&nbsp; 在表单头文件内(如Unit1.h) </p> 

 

<p>&nbsp;&nbsp;&nbsp;&nbsp; 1. 在表单类定义末尾加入消息响应表，取得WM_SYSCOMMAND消息的处理权  

<br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

BEGIN_MESSAGE_MAP <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

MESSAGE_HANDLER(WM_SYSCOMMAND,TMessage,OnWMSysCommand) <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

END_MESSAGE_MAP(TForm) </p> 

 

<p>&nbsp;&nbsp;&nbsp;&nbsp; 2. 在表单类定义的private区内加入消息处理函数声明  

<br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

private:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; // User declarations <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

void __fastcall OnWMSysCommand(TMessage&amp; Message); </p> 

 

<p>&nbsp;&nbsp;&nbsp;&nbsp; 在表单文件内(如Unit1.h) </p> 

 

<p>&nbsp;&nbsp;&nbsp;&nbsp; 3. 写出消息响应函数 <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

void __fastcall TForm1::OnWMSysCommand(TMessage&amp; Message) <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

{ <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

if(Message.WParam==ID_SysMenu_MyItem) <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

{ <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

// Your Code Here, Do Something <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

} <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

TForm::Dispatch(&amp;Message); <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

} <br> 

&nbsp; </p> 

 

<p>三、完整程序示例 </p> 

 

<p>实例二：给跟踪栏增加OnStartTrack和OnEndTrack事件 </p> 

 

<p>&nbsp;&nbsp;&nbsp; 当跟踪栏用于进度控制时，OnStartTrack和OnEndTrack很可能是你需要的事件。比如在控制多媒体播放进度的场合，当用户移动滑块时，你需要OnStartTrack事件让播放停止，需要OnEndTrack事件定位新的播放位置。但Borland公司没有提供这两个事件，我等编程爱好者只好自力更生，打拦截Windows消息的主意了。  

</p> 

 

<p>一、拦截WM_HSCROLL消息，给跟踪栏增加OnStartTrack和OnEndTrack事件 </p> 

 

<p>在表单头文件内（如Unit.h） </p> 

 

<p>&nbsp;&nbsp;&nbsp;&nbsp; 1. 在表单类定义末尾加入消息响应表，把WM_HSCROLL消息处理权交给OnWMHScroll函数。  

<br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

BEGIN_MESSAGE_MAP <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

MESSAGE_HANDLER(WM_HSCROLL,TMessage,OnWMHScroll) <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

END_MESSAGE_MAP(TForm) </p> 

 

<p>&nbsp;&nbsp;&nbsp;&nbsp; 2. 在表单类定义的private区内加入OnWMHScroll函数声明。  

<br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

private:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; // User declarations <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

void __fastcall OnWMHScroll(TMessage &amp;Message); <br> 

&nbsp; </p> 

 

<p>&nbsp;&nbsp;&nbsp; 3. 在表单类定义的private区内加入StartTrack和EndTrack函数声明。  

<br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

private:&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; // User declarations <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

void __fastcall TrackBar1StartTrack(TObject *Sender); <br> 

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  

void __fastcall TrackBar1EndTrack(TObject *Sender); </p> 

 

<p>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 在表单文件内（如Unit.cpp） </p> 

 

<p>&nbsp;&nbsp;&nbsp; 4. 写出OnWMHScroll函数，使它能根据消息参数调用StartTrack和EndTrack函数，在实际意义上产生OnStartTrack和OnEndTrack事件。  

</p> 

 

<p>&nbsp;&nbsp;&nbsp; 5. 写出StartTrack和EndTrack函数。 </p> 

 

<p>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 如果是垂直跟踪栏，把上面的WM_HSCROLL改为WM_VSCROLL即可。  

</p> 

 

<p>二、完整程序示例 </p> 

 

<p>尾声 </p> 

 

<p>Borland C++ Builder编程中，拦截Windows消息是一项高级编程技术，能让你尽量挖掘Windows的潜力，尤其让曾用API编程的程序员感到心慰。拦截Windows消息是API尽情发挥的舞台，当VCL不能为你做什么时，请想起底层的API。  

</p> 

 

</body> 

</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -