作者：杨超



    一个非可视的组件必须对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".  



　　ListingA和B包含了头文件和源代码以下列出。  



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



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