- 在线时间
- 0 小时
- 最后登录
- 2007-9-23
- 注册时间
- 2004-9-10
- 听众数
- 3
- 收听数
- 0
- 能力
- 0 分
- 体力
- 9975 点
- 威望
- 7 点
- 阅读权限
- 150
- 积分
- 4048
- 相册
- 0
- 日志
- 0
- 记录
- 0
- 帖子
- 1893
- 主题
- 823
- 精华
- 2
- 分享
- 0
- 好友
- 0

我的地盘我做主
该用户从未签到
 |
< > 一个非可视的组件必须对Windows操作系统或用户定义的消息作出响应。然而,由于一个非可视组件没有窗口,因此它也没有窗口句柄,自然它也不能接收到消息,为了解决这一问题,我们的思路是创建一个隐藏的窗口,使非可视组件能够接收到消息。 </P>
: r; U3 r& @4 F* f: F l< > 为了给你的非可视组件创建一个隐藏的窗口,需要有以下: </P>8 R' Q3 M+ z% j, |' W+ e
< > 1.一个私有变量型(Private Variable)的HWnd来取得窗口句柄。 </P>
+ R( s* P' D9 J9 `3 `< > 2.一个用来捕捉窗口发送给组件的函数(a WndProc)。 </P>7 H) r+ [( ?- t4 B% E/ a
< > 3.对AllcolateHwnd的调用使之创建窗口句柄并设置WndProc。 </P>8 h/ G4 h0 z5 A# `- V+ Y; P
< > 为了清楚的解释上述思路和展示创建过程,下面我们将以一个具体的实例来说明。 $ W, D( Q* r7 U. \" S
首先我们先创建一个新的组件,在C++Builder中,选择FILE|NEW...双击组件图标显示一个新的组件对话框改变Ancestor Type为Tcomponent和Class name为TTest并设置完毕。
, \5 z+ \4 X4 h* `( t# M9 g 然后,切换到新组件的头文件,在类的私有部分(private section)加入以下声明: </P>( d! R; N# O0 s! O
< > HWnd FHandle; 7 h8 m4 L: w8 s
void—fastcall WndProc(TMessage& Msg); </P>* s, @4 e/ N9 ~4 j, K7 v% e
< > 第一行声明了一个调用Fhandle的HWnd变量,这个变量将用于窗口创建后捕获窗口句柄。第二行声明了一个用于接收消息的WndProc函数。这个函数的声明必须加以标识,以便限定它是一个WndProc,然后在类声明Public(公有)部分构造以下声明: </P>
7 ?5 @) w) O# R/ Q" W< > Viod DoIt( ); </P>
' {+ a! Q: X6 V( r< > 这个公有函数将被我们用来测试组件,类声明应如下: </P>/ |# ]' k0 ~1 p2 D: ]
< > class PACKAGE TTest : public </P>, z& b; ^% z5 c& X4 s/ O" }; b
< > TComponent
# D, f T( J: w! h- k: p { 4 _* `0 ?/ D$ @* B+ y
private: </P>- L+ o/ u: R5 ^+ ^+ o. M- d; x4 V
< > HWnd FHandle;
7 w( V2 M$ V3 f+ f9 C2 m, ^) A1 k4 D void—fastcall WndProc(TMessage& Msg); </P>- E0 l8 E& z1 a$ `7 Z6 A
< > protected: </P>
C5 b9 Y5 M, h8 C< > public: </P>& s' s {6 n6 E1 R
< > —fastcall TTest(TComponent* Owner); </P>. e( ?' Z- L. N1 }1 m% c# |9 j" |
< > void DoIt( ); ; G( X; ?! k9 o+ V0 \" \1 i
" a" p/ n4 R4 Z0 x; e7 L
—published: </P>7 s# A5 ~; f8 ^0 y p& _9 l
< > }; </P>; m) \ @+ \8 Z* X1 k1 j. N
< > 现在切换到组件的代码单元,将下面一行加入到单元的顶部(在函数上也许是不错的地方) </P>- d( n4 I7 s* Q% D
< > #define MY—Message.WM_USER+1 </P>0 l: g( D) f! o- i. a/ M2 s, X' L/ H& Y
< > 这一行声明了一个在DoIt函数被调用时,组件将发送给它自己的用户自定义消息。此时我们必须为组件分配一个窗口句柄。这个句柄将提供一个隐藏的窗口使我们可以捕捉组件中的消息。找到组件构造代码,加入下面代码: </P>
; R* |- r: c' B5 U* R; r< > —fastcall Test::Test(TComponent* Owner): TComponent(Owner)
! ?& Z* v M3 L% a: T( J# Q {
$ G: M% d# Q8 k1 s. |% q; _& `; B FHandle=AllocateHWnd(WndProc); & d2 p. s: C/ ]0 P( }
} </P>' w4 } _/ i2 i% L8 |
< > 好,重要的一步已完成,AllocateHWnd函数创建了一个隐藏窗口并且返回它的句柄,注意这里我们为了使Windows知道哪里发来了消息,传递WndProc的地址; </P>! V9 ]$ T# @" ~" S: A' k
< > 现在我们来创建WndProc的函数部分。在源文件中加入: </P>- c( M$ ]( D' p2 c2 p5 |2 Q% p
< > void—fastcall TTest::WndProc(TMessage& Msg) 6 I. D' G0 E; {* B8 O$ M& @
{ $ O4 ^4 F8 u/ ~ ~# r" J
if (Msg.Msg == MY_MESSAGE)
' p8 `( K# F7 j& N8 F4 H- E( X# a MessageBox(0, ″Got here!″, ″Message″, 0);
) b% I) o* N$ U$ }- \1 X try { * v. T. H6 }8 {! k& K& |% n
Dispatch(&Msg);
" d# ^, v; S7 c" {# W, h } ( y% ]- m1 ]$ l9 r! f* D% j! L$ x7 d
catch (...) { </P>
) q8 }: t/ X7 H- Q< > Application-〉HandleException(this); </P>
6 _' [& q3 E& P8 K< > } </P>
?8 f! C" ~9 r3 N1 P% `" Y< > } </P>" h4 _1 h$ Q7 C; J" Q- \- j
< > 无论何时Windows发送消息给组件,Windows都会调用这个函数。这部分代码完成了两件事。首先,它检查被接收的消息是否是我们用户自定义的消息。如果是,一个消息框将被显示,你可以看到实际上我们接收到的消息。其次,这段代码传送了系统(或VCL)处理过程中的消息,try/catch块用来保证,如果异常出现,它将成为缺省风格下的句柄。 </P>4 Q4 [. j" Y3 f& {* x0 Q7 G; Q) d
< > 概括地说,WndProc函数在为缺省句柄传递所有其他消息,监控了所有客户消息。现在我们创建DoIt函数,完成我们的组件,加入我们创建DoIt函数,完成我们的组件,加入代码: </P>
- r) u9 L4 O E1 o! i<P> void TTest: oIt() </P>) }7 q+ L6 a# t% H5 Q8 |
<P> { </P>
5 |. E8 M; T9 y% R- f<P> PostMessage(FHandle, MY—MESSAGE, 0, 0); </P>
) m4 O2 f4 j3 @8 Y- X0 p* I<P> } </P>
6 f$ i: d1 f6 E% A9 j* q% d' b<P> 这个函数发送一个消息组件的窗口句柄(记住,这个窗口句柄是以前存入到Fhandle数据成品中的)。现在我们已经完成了创建组件选择,用SelectFile|ColseAll来保存我们的工作测试组件。 </P>& x V# k7 C6 a
<P> 下一步将测试组件。如果你使用BCB3,那么你必须把组件加入到“包”(Packege)中,然后用Componet|install(可以使用DCLSTD35 Packege来快速测试)。再选择你刚存的TestBCB.Cpp,一旦你安装完成组件后,它将出现在组件板上。双击按钮,为按钮的OnClick事件创建以下代码: </P>
/ y8 w5 J% e( s* ^* _' _0 F2 ?2 M<P> Test1-〉 DoIt( ); </P>/ t) ^6 ~8 K. Y* J0 O( d) F; I
<P> 现在运行程序,当你点击按钮时,将看到一个消息框显示“Got here". </P>+ G8 O- u' g. k/ ^2 B @
<P> ListingA和B包含了头文件和源代码以下列出。 </P>! G7 x {( D4 E4 B
<P> 总结:一个可以响应Windows消息的非可视组件有许多用途。最显而易见的就是用来封装某些方面的WindowsAPI。例如:TAPI和WinSock发送消息给事件的指定用户。如果你写的组件封装了一个这样的API。你将需要捕捉Windows发送的消息。而在你的组件中加入隐藏窗口将很好的帮你做到这一点。 </P>) J. V1 d: r$ X1 E" i9 o8 L* q
<P> 以上程序在C++ BUILDER 3.0中调试通过。 </P>
( V9 i0 |: X& V8 r1 c9 m<P> ( f9 u* G2 |1 D+ w" v; p
</P> |
zan
|