【图】CB非可视组件的消息处理技巧

　　一个非可视的组件必须对Windows操作系统或用户定义的消息作出响应。然而，由于一个非可视组件没有窗口，因此它也没有窗口句柄，自然它也不能接收到消息,为了解决这一问题,我们的思路是创建一个隐藏的窗口，使非可视组件能够接收到消息。

　　为了给你的非可视组件创建一个隐藏的窗口，需要有以下：

　　1．一个私有变量型(Private Variable)的HWnd来取得窗口句柄。

　　2．一个用来捕捉窗口发送给组件的函数(a WndProc)。

　　3．对AllcolateHwnd的调用使之创建窗口句柄并设置WndProc。

　　为了清楚的解释上述思路和展示创建过程，下面我们将以一个具体的实例来说明。

　　首先我们先创建一个新的组件，在C++ Builder中，选择FILE|NEW双击组件图标显示一个新的组件对话框改变Ancestor Type为Tcomponent和Class name为Ttest并设置完毕。

　　然后，切换到新组件的头文件，在类的私有部分(private section)加入以下声明：

　　HWnd Fhandle;

　　void __fastcall WndProc(Tmessage &Msg);

　　第一行声明了一个调用Fhandle的HWnd变量，这个变量将用于窗口创建后捕获窗口句柄。

　　第二行声明了一个用于接收消息的WndProc函数。这个函数的声明必须加以标识，以便限定它是一个WndProc,然后在类声明Public(公有)部分构造以下声明：

Viod DoIt( )；
　　这个公有函数将被我们用来测试组件，类声明应如下：
　　class PACKAGE Ttest:public Tcomponent
　　　{
　　　private:
　 　　 HWnd Fhandle;
　　　　void __fastcall WndProc(Tmessage &Msg);
　　　protected:
　　　public:
　 　　 __fastcall Ttest(Tcomponent *Owner);
　 　　 void DoIt( );
　　　__published:
　　　};

　　现在切换到组件的代码单元，将下面一行加入到单元的顶部(在函数上也许是不错的地方)

　　#define MY__Message WM_USER+1

　　这一行声明了一个在DoIt函数被调用时，组件将发送给它自己的用户自定义消息。此时我们必须为组件分配一个窗口句柄。这个句柄将提供一个隐藏的窗口使我们可以捕捉组件中的消息。找到组件构造代码，加入下面代码:

__fastcall Test::Test(Tcomponent *Owner): Tcomponent(Owner)
　　{
　　Fhandle=AllocateHWnd(WndProc);
　　}

　　好，重要的一步已完成，AllocateHWnd函数创建了一个隐藏窗口并且返回它的句柄，注意这里我们为了使Windows知道哪里发来了消息，传递WndProc的地址；

　　现在我们来创建WndProc的函数部分。在源文件中加入:

void __fastcall Ttest::WndProc(Tmessage &Msg)
　　{
　　 if (Msg.Msg == MY__MESSAGE)
　　　 MessageBox(0,"Got here!","Message",0);
　　 try 
{
　　　   Dispatch(&Msg);
　　　   }
　　   catch ()
{
　　　 Application-HandleException(this);
　　　 }
　　}

　　无论何时Windows发送消息给组件，Windows都会调用这个函数。这部分代码完成了两件事。首先，它检查被接收的消息是否是我们用户自定义的消息。如果是，一个消息框将被显示，你可以看到实际上我们接收到的消息。其次，这段代码传送了系统(或VCL)处理过程中的消息，try/catch块用来保证，如果异常出现，它将成为缺省风格下的句柄。

　　概括地说，WndProc函数在为缺省句柄传递所有其他消息，监控了所有客户消息。现在我们创建DoIt函数，完成我们的组件，加入我们创建DoIt函数，完成我们的组件，加入代码：

void Ttest::DoIt()
　　  {
　　  PostMessage(Fhandle, MY__MESSAGE, 0, 0);
　　  }

　　这个函数发送一个消息组件的窗口句柄(记住，这个窗口句柄是以前存入到Fhandle数据成品中的)。现在我们已经完成了创建组件选择，用SelectFile|ColseAll来保存我们的工作测试组件。

　　下一步将测试组件。如果你使用BCB3,那么你必须把组件加入到包(Packege)中，然后用Componet|install(可以使用DCLSTD35 Packege来快速测试)。再选择你刚存的TestBCB.Cpp,一旦你安装完成组件后，它将出现在组件板上。双击按钮，为按钮的OnClick事件创建以下代码：

　　Test1- DoIt( );

　　现在运行程序，当你点击按钮时，将看到一个消息框显示Got here".

　　总结：一个可以响应Windows消息的非可视组件有许多用途。最显而易见的就是用来封装某些方面的WindowsAPI。例如：TAPI和WinSock发送消息给事件的指定用户。如果你写的组件封装了一个这样的API。你将需要捕捉Windows发送的消息。而在你的组件中加入隐藏窗口将很好的帮你做到这一点。

　　以上程序在C++ BUILDER 3.0中调试通过。