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

我的地盘我做主
该用户从未签到
 |
< >最近在写一个程序用到了多线程,所以对CB下的多线程有一定的学习。
" n6 x$ }0 T1 |# H现在把自己的一些心得讲一下。水平有限,写的很粗略,请大家见谅。</P>
3 g- T' D. A5 t/ ?< >CB相对于VC来说,在CB下写多线程程序是很简单的。不仅是VCL中有TThread这个类。封装了那些关于多线程的WINDOW API。我觉得更方便的是他提供了( g( I3 O/ \6 p5 Q5 ~
直接访问主VCL线程中对象的能力。可以很容易的和主线程中的窗体,控件& _' H' Q6 V" W& d1 M3 |
打交道。和单线程的方式没有太多区别。只是在有多个线程都要访问主线程
P4 R( v9 G2 W7 {6 K中的对象(比如访问同一个窗体上的StringGrid).只要用Thread的Synchronize方法来调用那段访问主VCL线程的代码(具体请看帮助),我们就不用担心访问冲突的问题了。而且对于多线程的同步和互斥,CB也对WINDOW 编程中那些机制进行了封装。比如对临界区CriticalSection封装为TCriticalSection.事件Event封装为TEvent.这些类相当简单好用。
4 T C: [. \4 l0 N6 Y下面就是我觉得比较重要的几点,供大家参考.</P>
1 N# d( b& j7 j< >$ m0 I2 ^, H! H# Z" Z8 i. g" J# X) [
1。TThread的WaitFor方法。是等待一个线程返回。其返回值在这个线程里可以任意设定。以便在该线程返回的时候让调用他的线程知道他的运行情况。 + z1 Y6 \& H% l+ P5 W5 _% t$ y3 v! E
) m. b/ o8 n# v2 p
在TThread的 OnTerminate事件中做线程的清除工作。他不是线程运行的一部分。
% ~: \/ _! Y8 r' _5 V+ ^/ Z而是主VCL线程的一部分。所以在其中不能访问Thread的局部变量(如 int __thread i)
. w9 R, `/ q2 h0 f/ _- _你可以把清楚代码写在这里,不用管现在在EXCUTE()方法执行到了哪个地方。 {& S( a8 t, q
这么看起来有点类似于C++里的 finally 块的作用。
; {0 G) G) X# s ~* l5 E
8 Z, ?* \* u) }" S" A1 i2。TEvent很重要。实现线程的同步。WaitFor(int Timeout)功能类似于 6 A' V; U. z' j( O& C5 I1 c
WINDOW API WaitforSingleObject().返回值包括: + Y }9 b' P4 |8 \
其中参数Timeout可以设为INFINITE表示永久等待,但这样,程序很容易死在这里。 * o5 p# ]' [1 w5 |0 H8 |* D
+ u4 X, A, ]' `( Q" B% j
wrSignaled 该事件发生(成功返回).
0 F6 L1 e2 g. L7 F) C. H, {wrTimeout 等待超时. / |/ l9 C8 L. i$ U1 }1 }
wrAbandoned 在该事件的超时期限到达前,该事件对象已经被毁灭了。. 9 l4 z1 W, z+ e+ t, X! j( n& g2 L
wrError 在等待过程中有异常产生,要知道具体产生的错误要查看 TEvent的LastError
! ?: e( s- ^# F! P" z5 @属性。 ( b8 O+ r& _4 I7 K$ Z. @
/ h4 W/ m: V3 f4 ]# }& M
3? TCriticalSection 7 q h) [6 i% | _9 p* E% o! g
这个相当于WIN32编程中的临界区。 1 d9 d5 }+ l2 h) x
在多线程编程中,多个线程需要访问同一个公用变量的时候。
! `4 U/ {6 R1 z: G
# l& h3 }8 d/ z5 Q' v, _! D来保证访问的正确性。对公用变量访问的代码写在Enter();和Leave()之间。 : \1 s! [/ f- f% q
比如有个公用变量 Count;
: b( r7 z" V% B8 }9 T( {" ?以下代码 : 9 _7 n- f! @- H- W5 Z3 P
TCriticalSection * pSection=new TCriticalSection(); ! P" \0 v5 c) y# I+ S+ `
pSection->Enter();
! o7 X/ C& O6 x$ J& C( n7 b Count++;
* d- D0 n; S% L3 w8 ^ pSection->Leave(); 1 w$ n+ B- o! P+ R
delete p; & N+ W8 ^5 w. j0 ^) G- ^$ z/ E
; x% s8 H b6 u. ?7 V
Enter()方法进入临界区,对其中的公用变量加锁。 / Y2 b1 W. {( @% ?6 U+ I
Leave()方法离开临界区,对其中的公用变量解锁。
4 N# G1 e" ], A7 f
$ ^- U. a$ s# L' v6 Y1 l9 o: T
/ X+ k7 t2 M. Y+ ~% ~% f4.TMultiReadExclusiveWriteSynchronizer : p# n1 J7 W% U$ P
用来处理类似于多个生产者和多个消费者的问题。这里的消费者是指( b `: g* W# ~
对公用变量进行读操作的线程。
3 r4 ]; W# S: V( ~生产者是对公用变量进行写操作的线程。</P>5 r: ^; P8 m" F
< >四个方法。
+ F/ F2 l/ N. K1 s BeginRead2 \( R9 J: Z5 U/ `
EndRead
& D- J7 V, m( L0 ~9 X. V9 z这两个方法用于消费者。' ]1 [: I! ~7 D# m) `# l
BeginWrite3 A* L1 \1 |- a6 Q, i1 H
EndWrite
$ R: m/ T$ H/ F l这两个方法用于生产者。</P>
) V$ x( w7 e8 [' A< >使用的时候就是要把这个TMutiReadExclusiveWriteSynchronizer 定义一个全局变量。
( T/ E7 B7 K0 ?* X4 J然后在其他线程中访问他。</P>
& Y& t U! ]; P+ w! C
6 W* B$ i7 |& e7 A3 x< >
9 f( A# R$ R+ P, W+ b </P> |
zan
|