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

我的地盘我做主
该用户从未签到
 |
< >最近在写一个程序用到了多线程,所以对CB下的多线程有一定的学习。
7 g% y2 b5 c. P: {7 a现在把自己的一些心得讲一下。水平有限,写的很粗略,请大家见谅。</P>+ m( Y7 f8 {, w" ~" D2 j
< >CB相对于VC来说,在CB下写多线程程序是很简单的。不仅是VCL中有TThread这个类。封装了那些关于多线程的WINDOW API。我觉得更方便的是他提供了% [6 i v6 ]8 s* E8 m; j$ W
直接访问主VCL线程中对象的能力。可以很容易的和主线程中的窗体,控件
. l1 b4 S! ~+ I$ x6 q2 O. d( I& O% l打交道。和单线程的方式没有太多区别。只是在有多个线程都要访问主线程2 t( n9 X! l. V, P2 l3 p
中的对象(比如访问同一个窗体上的StringGrid).只要用Thread的Synchronize方法来调用那段访问主VCL线程的代码(具体请看帮助),我们就不用担心访问冲突的问题了。而且对于多线程的同步和互斥,CB也对WINDOW 编程中那些机制进行了封装。比如对临界区CriticalSection封装为TCriticalSection.事件Event封装为TEvent.这些类相当简单好用。& t% v0 {: M* Q3 h, {! o, M3 U' i
下面就是我觉得比较重要的几点,供大家参考.</P>
0 U: V5 h- \' o% ~7 O- l! m* N% p< ># M5 j! `) X9 O ~$ z! I
1。TThread的WaitFor方法。是等待一个线程返回。其返回值在这个线程里可以任意设定。以便在该线程返回的时候让调用他的线程知道他的运行情况。 ! c- U8 P2 j& N" P
& [1 l2 y" [' f* _! Y$ @在TThread的 OnTerminate事件中做线程的清除工作。他不是线程运行的一部分。
, U6 G" R1 w& A而是主VCL线程的一部分。所以在其中不能访问Thread的局部变量(如 int __thread i)
. ~/ j# p7 \4 @你可以把清楚代码写在这里,不用管现在在EXCUTE()方法执行到了哪个地方。
! v1 ~1 s& d4 W$ E6 J7 ~# B* R这么看起来有点类似于C++里的 finally 块的作用。 & Y. D) q' h0 p" n2 t, @# }
/ W) M+ K# \: ^( V2。TEvent很重要。实现线程的同步。WaitFor(int Timeout)功能类似于
$ n# f8 d+ ?) M. T8 t4 d9 ~6 p) P& @WINDOW API WaitforSingleObject().返回值包括:
) t, x: T/ E9 o1 k其中参数Timeout可以设为INFINITE表示永久等待,但这样,程序很容易死在这里。 ; u7 ^1 E x: {6 E) n
2 F9 n( g9 h& @1 g+ L& l% l
wrSignaled 该事件发生(成功返回).
$ P1 H/ ]0 Q1 L1 O# S; nwrTimeout 等待超时.
8 _; o* J* m' W2 @wrAbandoned 在该事件的超时期限到达前,该事件对象已经被毁灭了。. 0 G. s( u. B- c+ t& ]6 U
wrError 在等待过程中有异常产生,要知道具体产生的错误要查看 TEvent的LastError 7 o, {+ t" n" T6 j$ C
属性。 ' [9 K9 l9 K+ q6 U" {9 E9 ~
+ g1 r, o$ j) I: p9 Q0 w3? TCriticalSection
3 u' _% t9 W/ q' b1 Q5 w这个相当于WIN32编程中的临界区。
0 y- o, G5 {7 z# H2 f0 ~# I在多线程编程中,多个线程需要访问同一个公用变量的时候。 + o; W: v' O7 Q2 T5 @
2 Z2 T2 \2 q v, r: W) J来保证访问的正确性。对公用变量访问的代码写在Enter();和Leave()之间。
9 f* n% K+ L* g- C! ^% p" n比如有个公用变量 Count; * o) v7 w2 \) h8 g3 u1 Z9 f
以下代码 : : m2 ~* l# Q( j) v/ z: v
TCriticalSection * pSection=new TCriticalSection(); # S9 d# n% e# p5 f
pSection->Enter(); * ~! C' K9 Y% e* R& x+ ?: U' H
Count++; . e- l0 u7 Q4 v3 b. r
pSection->Leave();
( H. K0 r; Z% A8 j6 adelete p; % Q# b& ]' t3 b* A5 }% a
6 n& ~+ T6 @: TEnter()方法进入临界区,对其中的公用变量加锁。
+ `5 J# V! [8 \7 O6 FLeave()方法离开临界区,对其中的公用变量解锁。 W/ E& N9 p" i1 M
+ L5 A& ?/ u# k& m- @5 b7 ^% }
7 |* j; f4 a1 d: M3 D2 O6 w N
4.TMultiReadExclusiveWriteSynchronizer $ J( R0 a0 o4 l0 f+ y/ f2 s
用来处理类似于多个生产者和多个消费者的问题。这里的消费者是指
7 [# \1 a' i* D5 S0 B9 w对公用变量进行读操作的线程。# \) c) M! r' \
生产者是对公用变量进行写操作的线程。</P>: l/ ~- p5 s) x7 x3 L' D
< >四个方法。
0 p/ H) z6 R. i B" b& g! t5 C BeginRead
+ M! M3 E" _: G EndRead
( N+ n( K( n. k这两个方法用于消费者。
/ J) l$ ^3 K7 D$ a* x BeginWrite
3 N0 p: ?, p7 k9 i EndWrite
1 S4 A& Z! o# V* m, U; w这两个方法用于生产者。</P>+ W6 Q u+ P" z
< >使用的时候就是要把这个TMutiReadExclusiveWriteSynchronizer 定义一个全局变量。: y1 T. p, u2 ~2 Y9 n, ?
然后在其他线程中访问他。</P>2 z& _, G0 V' [( x. I: v
0 p6 _) c6 y: y8 c* e4 `) Y< >% P0 x# e4 m4 m# r0 ^
</P> |
zan
|