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

我的地盘我做主
该用户从未签到
 |
< >最近在写一个程序用到了多线程,所以对CB下的多线程有一定的学习。
* E% f! H9 N3 H. T$ H# b现在把自己的一些心得讲一下。水平有限,写的很粗略,请大家见谅。</P>2 X; n& L* \8 @: W
< >CB相对于VC来说,在CB下写多线程程序是很简单的。不仅是VCL中有TThread这个类。封装了那些关于多线程的WINDOW API。我觉得更方便的是他提供了
' j+ ^% _4 A$ P# s! o3 R9 |直接访问主VCL线程中对象的能力。可以很容易的和主线程中的窗体,控件! u. t9 z1 S! _- R" {9 T- t) P
打交道。和单线程的方式没有太多区别。只是在有多个线程都要访问主线程* G# _! v6 w" K3 ^7 k G$ J6 f
中的对象(比如访问同一个窗体上的StringGrid).只要用Thread的Synchronize方法来调用那段访问主VCL线程的代码(具体请看帮助),我们就不用担心访问冲突的问题了。而且对于多线程的同步和互斥,CB也对WINDOW 编程中那些机制进行了封装。比如对临界区CriticalSection封装为TCriticalSection.事件Event封装为TEvent.这些类相当简单好用。8 f9 K l, a- E! d% M6 v w- K- A3 F
下面就是我觉得比较重要的几点,供大家参考.</P>
: R4 A' o4 W1 Z< >
# X$ P, [; w8 {1。TThread的WaitFor方法。是等待一个线程返回。其返回值在这个线程里可以任意设定。以便在该线程返回的时候让调用他的线程知道他的运行情况。 $ z6 L5 |( [- X- T. w
" Q( N; S( t8 z, |* U; ^2 c
在TThread的 OnTerminate事件中做线程的清除工作。他不是线程运行的一部分。 , l4 Z( ]& p& Z
而是主VCL线程的一部分。所以在其中不能访问Thread的局部变量(如 int __thread i) ; b, B- T2 ~6 u% _0 N5 c
你可以把清楚代码写在这里,不用管现在在EXCUTE()方法执行到了哪个地方。 3 E* l( S, W& ^5 w5 I1 s3 q
这么看起来有点类似于C++里的 finally 块的作用。 ; G7 t) a c! F0 G5 d
8 {) n" @) U: M X7 t
2。TEvent很重要。实现线程的同步。WaitFor(int Timeout)功能类似于 ' }9 @( p6 H8 e+ p8 \% M
WINDOW API WaitforSingleObject().返回值包括: 3 [' W5 h7 w t2 v m
其中参数Timeout可以设为INFINITE表示永久等待,但这样,程序很容易死在这里。 . l& i1 J6 v$ f; ~, ]# L7 R$ S1 H
; A1 h& T8 _4 @9 r0 X/ J3 rwrSignaled 该事件发生(成功返回).
5 u( D6 K0 @3 J% pwrTimeout 等待超时. : Q0 S6 Y! I9 `
wrAbandoned 在该事件的超时期限到达前,该事件对象已经被毁灭了。. 8 e0 t3 }: z* B7 @; h; G
wrError 在等待过程中有异常产生,要知道具体产生的错误要查看 TEvent的LastError
0 M9 `# h7 ?4 y% I3 G属性。 - J2 Y0 |* e9 x: x( B, @+ ?
6 M: `& y4 J2 \3? TCriticalSection
" v+ o: n' o+ x$ C8 ~这个相当于WIN32编程中的临界区。
( s0 r7 C4 ]- ~在多线程编程中,多个线程需要访问同一个公用变量的时候。
, \: a$ d7 ~! P& X# c# _3 I) I
9 i, n" r- x2 u9 r! W来保证访问的正确性。对公用变量访问的代码写在Enter();和Leave()之间。 2 _3 [* O& G% Z; b
比如有个公用变量 Count;
0 u/ m+ |) N( W以下代码 :
- q4 V) P) {/ d# `& n% T5 I1 ?TCriticalSection * pSection=new TCriticalSection();
+ R. h1 V/ ~7 `4 n/ G% k pSection->Enter(); 2 ?- I+ m% T3 q O% v4 h: `
Count++;
; x% H v% b+ L/ h8 Y3 q; P0 j* c pSection->Leave(); * f1 {# H' E$ A3 M" t0 z# ^) Y" x
delete p; + I" i: d/ z% J
/ O6 [, X- U# E3 r7 r& eEnter()方法进入临界区,对其中的公用变量加锁。 . d z q. V3 g$ r% ~
Leave()方法离开临界区,对其中的公用变量解锁。 % T% }- F5 t4 T* N/ y5 u* F
* K4 i! @5 o% n$ H: o" t
+ U- ?# n/ h6 R! u8 U4.TMultiReadExclusiveWriteSynchronizer ; I3 f1 \ C- {. Q
用来处理类似于多个生产者和多个消费者的问题。这里的消费者是指
. i2 b$ p' g: n' q, x对公用变量进行读操作的线程。
5 c8 A# c5 E( z4 U4 _生产者是对公用变量进行写操作的线程。</P>
. x" s9 Q5 ^5 t' p/ g6 c8 G8 G6 z& q< >四个方法。) }- N5 A+ E- n/ N& _/ i
BeginRead7 V8 J% F- U; a1 S0 e) ^! u( K
EndRead6 u [4 g4 V2 t! _
这两个方法用于消费者。
+ M3 m/ B$ G+ A' q, \, X BeginWrite
9 p- W( r$ Y; u EndWrite& x& m/ c! ? |8 u6 a0 |/ V
这两个方法用于生产者。</P>* a! z2 h& j1 a" R. S! R2 \2 M
< >使用的时候就是要把这个TMutiReadExclusiveWriteSynchronizer 定义一个全局变量。2 ~( t1 s1 O N. X4 U+ Y: C
然后在其他线程中访问他。</P>
+ Q+ @0 v3 q% Q9 I/ C" M
. v8 R+ _8 H) c# _. W2 B- T3 z< >+ P* [; W! N% }8 n; F# d
</P> |
zan
|