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

我的地盘我做主
该用户从未签到
 |
< >最近在写一个程序用到了多线程,所以对CB下的多线程有一定的学习。 n8 z/ O& J F% w* |6 g
现在把自己的一些心得讲一下。水平有限,写的很粗略,请大家见谅。</P>4 L0 Q: }, v; x+ J, f6 |* t F
< >CB相对于VC来说,在CB下写多线程程序是很简单的。不仅是VCL中有TThread这个类。封装了那些关于多线程的WINDOW API。我觉得更方便的是他提供了( v. y% W, T5 m; H* T$ W' y# e3 ?
直接访问主VCL线程中对象的能力。可以很容易的和主线程中的窗体,控件
( X8 x [( V) s5 J2 ^打交道。和单线程的方式没有太多区别。只是在有多个线程都要访问主线程' d" k* }0 `8 |- P) b+ S
中的对象(比如访问同一个窗体上的StringGrid).只要用Thread的Synchronize方法来调用那段访问主VCL线程的代码(具体请看帮助),我们就不用担心访问冲突的问题了。而且对于多线程的同步和互斥,CB也对WINDOW 编程中那些机制进行了封装。比如对临界区CriticalSection封装为TCriticalSection.事件Event封装为TEvent.这些类相当简单好用。; t4 e0 R2 K+ t1 Y; F6 ?' D0 v
下面就是我觉得比较重要的几点,供大家参考.</P>
" y& R( q% K+ D& G! h$ F< >' l' a' G8 w/ J- y# [
1。TThread的WaitFor方法。是等待一个线程返回。其返回值在这个线程里可以任意设定。以便在该线程返回的时候让调用他的线程知道他的运行情况。 ) j: v# }5 r$ A1 H
7 s: z) Q9 n' W3 U
在TThread的 OnTerminate事件中做线程的清除工作。他不是线程运行的一部分。
- e& k* k- a2 \" ? f1 l7 A而是主VCL线程的一部分。所以在其中不能访问Thread的局部变量(如 int __thread i)
4 m9 y2 `. o. m `+ W6 q你可以把清楚代码写在这里,不用管现在在EXCUTE()方法执行到了哪个地方。 + K5 G% p. n/ `: B
这么看起来有点类似于C++里的 finally 块的作用。
+ J" u; z# H; ?6 p r ) n e- x# G: R. ?4 A- q
2。TEvent很重要。实现线程的同步。WaitFor(int Timeout)功能类似于 # O+ t# Z/ z% b3 y2 I m* Y
WINDOW API WaitforSingleObject().返回值包括: & O8 ^: l7 D; }4 q, B; o, i C8 `
其中参数Timeout可以设为INFINITE表示永久等待,但这样,程序很容易死在这里。 ; E8 E9 M* D* O' z$ ], \9 p; D
/ ?9 p# p1 S3 }- g* u% i5 G( t
wrSignaled 该事件发生(成功返回). * ~0 `0 u4 z% b. q5 n( o
wrTimeout 等待超时.
B. G% J1 \. P- ewrAbandoned 在该事件的超时期限到达前,该事件对象已经被毁灭了。.
7 `% U7 F. b; t; Q% T: t& vwrError 在等待过程中有异常产生,要知道具体产生的错误要查看 TEvent的LastError + x+ W! _+ t% B
属性。
% D7 U+ @$ `7 P2 L# R0 t 2 ], x* W- {2 Q% r
3? TCriticalSection
6 h9 j7 D, e8 N* l7 q w+ a这个相当于WIN32编程中的临界区。 " r9 D9 W: H j4 X
在多线程编程中,多个线程需要访问同一个公用变量的时候。 * X5 H4 H3 C* e" _, t4 Z; o- a S
4 U) \5 ~+ Y! d- D X来保证访问的正确性。对公用变量访问的代码写在Enter();和Leave()之间。
! e6 p6 `; V6 V% u: _) t- |: k比如有个公用变量 Count; ) \5 ?- c8 B1 A d
以下代码 :
0 D2 w$ v) d- I/ zTCriticalSection * pSection=new TCriticalSection();
6 y6 y$ J' o) v' N pSection->Enter();
& e: R2 j6 M; c1 V6 ~ Count++;
, ^) l# Y! m. u: x% Z2 e pSection->Leave();
! k! h. q J1 Q# F* r( J6 A% mdelete p;
. e9 M3 `; B" A! d 1 j6 l9 z+ [, E$ i
Enter()方法进入临界区,对其中的公用变量加锁。
/ r7 P) d' ]; ^$ |! PLeave()方法离开临界区,对其中的公用变量解锁。 6 P9 N* A/ D8 x
$ r1 W4 J0 |2 u/ k6 x4 D6 T( |
5 ]: l( T3 S0 H% y, W( w4.TMultiReadExclusiveWriteSynchronizer ' P/ v" [4 b6 E5 W8 s2 f$ b/ n
用来处理类似于多个生产者和多个消费者的问题。这里的消费者是指
' n) w) @+ A- e, E: r) p5 d- V对公用变量进行读操作的线程。
3 o5 T% _/ }- l' Y生产者是对公用变量进行写操作的线程。</P>9 Y( n- w9 I) P- {$ F
< >四个方法。! @0 M- V4 u$ C# s. j
BeginRead |) B5 Z# X1 R N3 `' V. R
EndRead4 ?% x4 ` o5 w, g9 U7 |
这两个方法用于消费者。
; N" @% T" J" T$ X9 O BeginWrite
6 U. ~/ q2 I1 d% M5 [' O EndWrite0 m& B: Y) e) `! v& ?
这两个方法用于生产者。</P>; R3 p8 `9 L! }& }% M, V
< >使用的时候就是要把这个TMutiReadExclusiveWriteSynchronizer 定义一个全局变量。
' S( A7 a: j+ l5 E然后在其他线程中访问他。</P>4 n0 R' X0 q6 N3 `+ W' ^
! u8 W# S7 E5 [
< >; k2 {9 k: R, L* f
</P> |
zan
|