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

我的地盘我做主
该用户从未签到
 |
< >最近在写一个程序用到了多线程,所以对CB下的多线程有一定的学习。
! Z; ^6 N& O6 H/ E Y5 O+ n* q现在把自己的一些心得讲一下。水平有限,写的很粗略,请大家见谅。</P>$ ^. g$ g2 W% K! h( ?3 u; y9 n
< >CB相对于VC来说,在CB下写多线程程序是很简单的。不仅是VCL中有TThread这个类。封装了那些关于多线程的WINDOW API。我觉得更方便的是他提供了3 B' g' s& R+ J" h- h
直接访问主VCL线程中对象的能力。可以很容易的和主线程中的窗体,控件, R5 j( y+ E; T- M* C G9 R
打交道。和单线程的方式没有太多区别。只是在有多个线程都要访问主线程
K7 D: ?. N! E) E中的对象(比如访问同一个窗体上的StringGrid).只要用Thread的Synchronize方法来调用那段访问主VCL线程的代码(具体请看帮助),我们就不用担心访问冲突的问题了。而且对于多线程的同步和互斥,CB也对WINDOW 编程中那些机制进行了封装。比如对临界区CriticalSection封装为TCriticalSection.事件Event封装为TEvent.这些类相当简单好用。
3 z' |/ K) s0 h* b下面就是我觉得比较重要的几点,供大家参考.</P>
+ B5 Q O( k w8 H n* F< >! v/ O* G2 I0 y& g' S
1。TThread的WaitFor方法。是等待一个线程返回。其返回值在这个线程里可以任意设定。以便在该线程返回的时候让调用他的线程知道他的运行情况。
! y8 M( f" i* d7 A9 L% V
2 Z7 H& D0 s R2 ]2 z在TThread的 OnTerminate事件中做线程的清除工作。他不是线程运行的一部分。 ' K' w5 P/ T$ J" b, t% I, ^
而是主VCL线程的一部分。所以在其中不能访问Thread的局部变量(如 int __thread i)
+ @9 @6 J7 e3 R/ y% y/ E你可以把清楚代码写在这里,不用管现在在EXCUTE()方法执行到了哪个地方。
& @' Y5 r( }1 ~0 W9 {这么看起来有点类似于C++里的 finally 块的作用。
& S; ]5 X+ ^$ K& {2 X% F
5 ]8 i9 U5 u7 S: ^; Q/ \/ Y3 G2。TEvent很重要。实现线程的同步。WaitFor(int Timeout)功能类似于 % B6 Y3 O* J. g- R) @! }
WINDOW API WaitforSingleObject().返回值包括:
% M" }$ _0 J9 Z( T+ q Q其中参数Timeout可以设为INFINITE表示永久等待,但这样,程序很容易死在这里。 % p6 U0 t a1 g$ f. V
% b5 |: N. u! }6 @wrSignaled 该事件发生(成功返回).
2 i* ?* J5 }9 q2 {7 c& qwrTimeout 等待超时. 9 {2 L5 K) l. j% _
wrAbandoned 在该事件的超时期限到达前,该事件对象已经被毁灭了。. % ~ \. E4 h/ o
wrError 在等待过程中有异常产生,要知道具体产生的错误要查看 TEvent的LastError
% }- u; ?' O# Z: X属性。
0 F2 ]0 b+ P7 m$ ^& M) u m& S 3 l) G9 j) V. A$ F) N0 l
3? TCriticalSection
, \/ ^* |1 g% i$ y/ v这个相当于WIN32编程中的临界区。
; ^0 P3 G2 k- b1 \; h! C R/ ~8 U: y在多线程编程中,多个线程需要访问同一个公用变量的时候。 + o+ Y" G4 @7 R- I! V7 g2 u W; ?
( ^: ^" ^4 ]% A) c来保证访问的正确性。对公用变量访问的代码写在Enter();和Leave()之间。
+ u" p" k: G) Q d# t8 l" G比如有个公用变量 Count;
( p) J1 j% j8 e- B+ W$ a以下代码 : 2 E% x' q) s' @7 U
TCriticalSection * pSection=new TCriticalSection(); ( i8 X- R* T5 r$ x0 u& f) g: {( J
pSection->Enter(); 6 e, D2 [: ?2 i* q: R0 y' w+ Q; Z
Count++; ( Z2 q8 B7 v2 t! A" L4 g
pSection->Leave();
# r( J8 }# ~, h- G, \% G9 Kdelete p;
1 G! t- K+ x p1 f1 X / l' g0 {# Y# B* a3 f0 I% C
Enter()方法进入临界区,对其中的公用变量加锁。
" V e ?- j: J0 gLeave()方法离开临界区,对其中的公用变量解锁。
$ Q t1 H& u. q- E7 h. q
$ N) z8 [1 V+ n9 K 1 G. b; e. }, C3 |& R& z
4.TMultiReadExclusiveWriteSynchronizer " t( A+ f. j5 r q! ` u
用来处理类似于多个生产者和多个消费者的问题。这里的消费者是指
- M& I7 \, {" B对公用变量进行读操作的线程。8 V' z: c$ p' Z+ ?' R' l
生产者是对公用变量进行写操作的线程。</P>2 p/ S2 f2 T4 f! k1 d9 S9 n2 z& U
< >四个方法。
7 s2 Q" w' u& `& W1 J4 z BeginRead8 P0 z$ }4 o9 y6 B( S
EndRead
5 T/ t+ q* e8 t/ R2 C, F9 c这两个方法用于消费者。
$ ]- W4 Q% d( `. D" \+ w" S- E BeginWrite; F4 k) y# I$ M* ^
EndWrite
8 `0 d) F+ I9 h$ V2 K这两个方法用于生产者。</P>
* P9 q8 p: D0 |: n$ m1 I" ?6 q< >使用的时候就是要把这个TMutiReadExclusiveWriteSynchronizer 定义一个全局变量。
' b; Z3 D! H) s! E. ^然后在其他线程中访问他。</P>( P0 A2 \& r8 c3 _7 S
, w: ? g% d3 s. z8 u! W* S; S
< >4 b9 ?$ F3 _0 t, d, t
</P> |
zan
|