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

我的地盘我做主
该用户从未签到
 |
< >最近在写一个程序用到了多线程,所以对CB下的多线程有一定的学习。6 E$ X, z! ?7 k$ c3 I" |$ x
现在把自己的一些心得讲一下。水平有限,写的很粗略,请大家见谅。</P>2 ]: e2 C0 I) ~
< >CB相对于VC来说,在CB下写多线程程序是很简单的。不仅是VCL中有TThread这个类。封装了那些关于多线程的WINDOW API。我觉得更方便的是他提供了
. e: l0 F) ?" T# Q1 t直接访问主VCL线程中对象的能力。可以很容易的和主线程中的窗体,控件
( {( Z& b3 }& {8 e# `& |6 s打交道。和单线程的方式没有太多区别。只是在有多个线程都要访问主线程+ {! x7 F- Z, u, M) f
中的对象(比如访问同一个窗体上的StringGrid).只要用Thread的Synchronize方法来调用那段访问主VCL线程的代码(具体请看帮助),我们就不用担心访问冲突的问题了。而且对于多线程的同步和互斥,CB也对WINDOW 编程中那些机制进行了封装。比如对临界区CriticalSection封装为TCriticalSection.事件Event封装为TEvent.这些类相当简单好用。& x. O+ v D' p! o0 T0 h' Y
下面就是我觉得比较重要的几点,供大家参考.</P>
# M& D) r6 h5 i+ u0 n/ t< >6 W+ Z& g& t$ \$ @/ p
1。TThread的WaitFor方法。是等待一个线程返回。其返回值在这个线程里可以任意设定。以便在该线程返回的时候让调用他的线程知道他的运行情况。
) D& R1 L4 ~" k
: ]" f3 |% ?. o. O在TThread的 OnTerminate事件中做线程的清除工作。他不是线程运行的一部分。
0 k3 Y& w3 k& @" M; d而是主VCL线程的一部分。所以在其中不能访问Thread的局部变量(如 int __thread i)
& w4 i2 I% Q9 p# S! z: Q h3 ^你可以把清楚代码写在这里,不用管现在在EXCUTE()方法执行到了哪个地方。 ( H5 i+ h' @+ W) w* b0 C
这么看起来有点类似于C++里的 finally 块的作用。
0 ^# y' ^$ u& t' O$ k
( }# `; y) ], o) J& l& U% u( g2。TEvent很重要。实现线程的同步。WaitFor(int Timeout)功能类似于
3 H' q* n5 K8 N, W, j2 H6 R- aWINDOW API WaitforSingleObject().返回值包括:
" N( m$ x5 S3 K3 j; p C% ~7 X6 N, G其中参数Timeout可以设为INFINITE表示永久等待,但这样,程序很容易死在这里。 - h7 B8 K. P6 O
0 h( p4 W4 m% f1 ]! D
wrSignaled 该事件发生(成功返回). + D- {4 E9 S6 K1 F# B$ \5 u
wrTimeout 等待超时. ( u* Z% H% E; c, J7 i# e* \ p# W
wrAbandoned 在该事件的超时期限到达前,该事件对象已经被毁灭了。.
% L" u) [; r b; @wrError 在等待过程中有异常产生,要知道具体产生的错误要查看 TEvent的LastError 8 \5 f% ~" n7 r s3 U
属性。
. t9 P# u1 }. \9 n+ w
( q# J4 T2 x% K+ h e! s1 I3? TCriticalSection
8 A, N; d& o* f# R7 ]这个相当于WIN32编程中的临界区。
; d, f, H3 e* S1 G) `7 r3 a8 U2 t在多线程编程中,多个线程需要访问同一个公用变量的时候。
, c( K( _ ~+ E # `# j3 ]( J! I% Q' h7 p" G0 e
来保证访问的正确性。对公用变量访问的代码写在Enter();和Leave()之间。 / \* O8 F; I) `( q9 e: ~6 I/ m
比如有个公用变量 Count;
6 M. \+ u& p2 T2 z V以下代码 : 5 o9 Y, A2 I% x3 {
TCriticalSection * pSection=new TCriticalSection();
9 c+ a" f( ~1 Q& @3 l pSection->Enter();
5 S8 v% W1 }; F) F" l Count++;
3 b' o+ K; I5 H, H& m/ l pSection->Leave(); . k/ X5 N8 b- h+ J2 \
delete p;
4 ]- I; `! K# k % T0 N' Q' t$ I/ E/ B
Enter()方法进入临界区,对其中的公用变量加锁。
0 R! n) \, J$ M5 w: w. e: CLeave()方法离开临界区,对其中的公用变量解锁。 $ M+ E( c4 \; `; ^; Q; H! D
# Y9 d! P; ]6 _4 g" N
( g) n' h0 ^% Y4.TMultiReadExclusiveWriteSynchronizer
( V! X4 b7 y# ~! D7 \0 p- w; y用来处理类似于多个生产者和多个消费者的问题。这里的消费者是指
8 u7 r) z- `2 W$ z0 h p) i* M对公用变量进行读操作的线程。
) L% @! z, _, ?1 B, H生产者是对公用变量进行写操作的线程。</P>2 J" o- [: ?3 g6 R( V: l0 o$ }
< >四个方法。
! _$ Q% F0 {# {9 F8 {1 s BeginRead
0 m- L3 C/ n3 k3 O/ `$ I EndRead0 D6 z/ W5 P/ ~
这两个方法用于消费者。
$ j0 X1 F3 A( y7 r6 U BeginWrite# J3 j+ D$ e p2 K) m! b4 J
EndWrite
+ p; M% d8 [# Y这两个方法用于生产者。</P>7 e5 E+ @' P' H$ X& }" O, h! P
< >使用的时候就是要把这个TMutiReadExclusiveWriteSynchronizer 定义一个全局变量。% R+ j( c, \; d0 `2 m
然后在其他线程中访问他。</P>0 t( x4 g5 _6 F8 l* u( {
; w2 x- q2 f' l. h% M- M6 X% S0 H
< >
+ D( H {( {1 {( |# m5 z; F7 l </P> |
zan
|