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

我的地盘我做主
该用户从未签到
 |
< >最近在写一个程序用到了多线程,所以对CB下的多线程有一定的学习。7 X7 ~: J R$ l( r1 T* R
现在把自己的一些心得讲一下。水平有限,写的很粗略,请大家见谅。</P>
: [) n- T+ s' J2 f< >CB相对于VC来说,在CB下写多线程程序是很简单的。不仅是VCL中有TThread这个类。封装了那些关于多线程的WINDOW API。我觉得更方便的是他提供了8 o+ }; t6 w2 h+ j
直接访问主VCL线程中对象的能力。可以很容易的和主线程中的窗体,控件
% Z, r/ R7 D9 w n; l( R: U打交道。和单线程的方式没有太多区别。只是在有多个线程都要访问主线程 b0 Y4 b, X. z% D6 \( v3 A" N
中的对象(比如访问同一个窗体上的StringGrid).只要用Thread的Synchronize方法来调用那段访问主VCL线程的代码(具体请看帮助),我们就不用担心访问冲突的问题了。而且对于多线程的同步和互斥,CB也对WINDOW 编程中那些机制进行了封装。比如对临界区CriticalSection封装为TCriticalSection.事件Event封装为TEvent.这些类相当简单好用。% N; ?% F$ E% C9 @2 C. Z
下面就是我觉得比较重要的几点,供大家参考.</P>
0 k6 F9 q1 w7 s, ~9 o' K" D3 O0 O< >
2 S3 h' a% y9 k* O( A1。TThread的WaitFor方法。是等待一个线程返回。其返回值在这个线程里可以任意设定。以便在该线程返回的时候让调用他的线程知道他的运行情况。 . E, E. [- j6 i
0 I' @1 D* C9 k1 i在TThread的 OnTerminate事件中做线程的清除工作。他不是线程运行的一部分。
$ \" _; k {$ I+ ]而是主VCL线程的一部分。所以在其中不能访问Thread的局部变量(如 int __thread i)
) o3 \0 I% `5 @你可以把清楚代码写在这里,不用管现在在EXCUTE()方法执行到了哪个地方。 U* n' v. d7 H4 P/ U! K$ k6 ^
这么看起来有点类似于C++里的 finally 块的作用。
; b2 |" k+ ^* X4 \ n
5 N \* v: Z0 W! e) _- S+ w& J2。TEvent很重要。实现线程的同步。WaitFor(int Timeout)功能类似于
$ b) Y2 C, x( }. dWINDOW API WaitforSingleObject().返回值包括: $ w" O0 g7 }2 d& N, q
其中参数Timeout可以设为INFINITE表示永久等待,但这样,程序很容易死在这里。
- _" d/ v5 X3 x: W( a% Z 7 f# N2 K' t7 W6 N
wrSignaled 该事件发生(成功返回).
8 H7 F6 A$ L8 ]) ?& n% WwrTimeout 等待超时.
, e0 ~! E; T9 N6 twrAbandoned 在该事件的超时期限到达前,该事件对象已经被毁灭了。.
. x4 x! I9 i7 x/ n: H* TwrError 在等待过程中有异常产生,要知道具体产生的错误要查看 TEvent的LastError + |( Z' }7 q3 C" D; q
属性。 * R; T" p# l4 \1 h& O+ h
9 P# k- |/ k% J( P
3? TCriticalSection
- Q$ J; f& ]+ p' n: ^; V这个相当于WIN32编程中的临界区。
2 `. H& y, L2 |) f \在多线程编程中,多个线程需要访问同一个公用变量的时候。 ' c& t" R: s% C9 g; c" r7 ~4 ]0 G: H
l7 D7 ?3 d5 X3 W# K来保证访问的正确性。对公用变量访问的代码写在Enter();和Leave()之间。 . J; v- u' B1 p! A. s/ N* W
比如有个公用变量 Count;
( X4 E z- ~) V) J以下代码 :
1 ?3 F4 E; g7 s+ ]+ o ^4 ZTCriticalSection * pSection=new TCriticalSection();
' i$ J9 _$ [# [/ m) p pSection->Enter(); 2 @5 ~% L( K) `
Count++;
$ |5 ^4 r3 {/ s- }- J pSection->Leave(); ' a- |5 C- `$ y2 {* x# h! O! ^
delete p; / b) c# V% e# A& Z( @
" V. Y' V' O+ p& b. L: V0 QEnter()方法进入临界区,对其中的公用变量加锁。
3 o& v X) S1 f0 y* J0 n, L( qLeave()方法离开临界区,对其中的公用变量解锁。 % C5 \% a( n; @- J. z
: n% ^/ `( }$ [' Z. J6 f
8 }# R8 q# |" U2 X3 _4 L, V4.TMultiReadExclusiveWriteSynchronizer 6 ~7 d! x4 s: ~
用来处理类似于多个生产者和多个消费者的问题。这里的消费者是指
2 Y# w- @- U1 p5 t/ v- D, L对公用变量进行读操作的线程。8 `- z3 g/ F9 }& K
生产者是对公用变量进行写操作的线程。</P>4 V' }: Q* O7 z0 T9 ^0 \
< >四个方法。
: O# M6 D$ O7 ~$ d, S: g4 `2 y BeginRead& T6 z* E% ?( ?$ j8 J
EndRead
2 r7 \& {0 m- y+ I这两个方法用于消费者。
& q2 \/ |, u) r BeginWrite7 F5 M; g, |$ I, z, P* E
EndWrite
: k3 K+ r% I8 d0 _* p! w这两个方法用于生产者。</P>
( \* w9 L8 \% F< >使用的时候就是要把这个TMutiReadExclusiveWriteSynchronizer 定义一个全局变量。- {; i* e* F0 q8 n; L: E
然后在其他线程中访问他。</P>
' F8 T) i& [) P: G
3 Y8 k8 R- k9 r< >) J$ F( `+ q; l+ M, k/ b! l
</P> |
zan
|