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

我的地盘我做主
该用户从未签到
 |
< >最近在写一个程序用到了多线程,所以对CB下的多线程有一定的学习。
' V, |4 B7 f, ^- j7 m现在把自己的一些心得讲一下。水平有限,写的很粗略,请大家见谅。</P>
8 @" w C3 b! i- j- q+ C: W4 N< >CB相对于VC来说,在CB下写多线程程序是很简单的。不仅是VCL中有TThread这个类。封装了那些关于多线程的WINDOW API。我觉得更方便的是他提供了6 B5 ^3 v: F2 B, }# x/ [
直接访问主VCL线程中对象的能力。可以很容易的和主线程中的窗体,控件& v, `! ^% ^, R$ r1 Z
打交道。和单线程的方式没有太多区别。只是在有多个线程都要访问主线程- P! j5 \1 \0 H! l# `
中的对象(比如访问同一个窗体上的StringGrid).只要用Thread的Synchronize方法来调用那段访问主VCL线程的代码(具体请看帮助),我们就不用担心访问冲突的问题了。而且对于多线程的同步和互斥,CB也对WINDOW 编程中那些机制进行了封装。比如对临界区CriticalSection封装为TCriticalSection.事件Event封装为TEvent.这些类相当简单好用。2 k. j I) o I! K
下面就是我觉得比较重要的几点,供大家参考.</P>
! h; y( R7 G4 S& D1 B2 x8 [, ]< >
* O! r6 U! y' q1。TThread的WaitFor方法。是等待一个线程返回。其返回值在这个线程里可以任意设定。以便在该线程返回的时候让调用他的线程知道他的运行情况。
6 C, \$ _* ~* _ A. k5 d2 L+ L
' K9 f* d7 L, Q$ u" h在TThread的 OnTerminate事件中做线程的清除工作。他不是线程运行的一部分。 0 @: J& [: G" y7 [& I0 `
而是主VCL线程的一部分。所以在其中不能访问Thread的局部变量(如 int __thread i) : U7 A4 u- C: p6 f6 J5 {
你可以把清楚代码写在这里,不用管现在在EXCUTE()方法执行到了哪个地方。
* b, I# A- _' L( Q+ e& Y# I这么看起来有点类似于C++里的 finally 块的作用。
3 w5 S' m, N5 H9 j; h( E: }: \% n
# }- S& j, T, ]" P2。TEvent很重要。实现线程的同步。WaitFor(int Timeout)功能类似于 , D$ f) m- U" Z( q
WINDOW API WaitforSingleObject().返回值包括: 2 \3 g1 L0 {# t, D `; X/ X
其中参数Timeout可以设为INFINITE表示永久等待,但这样,程序很容易死在这里。
; v) F+ T& \7 `; c. q , P& b5 g- \/ J
wrSignaled 该事件发生(成功返回). 9 ^5 V- b% M/ f# D
wrTimeout 等待超时. 4 B/ f: G9 O2 T5 T1 ^. a
wrAbandoned 在该事件的超时期限到达前,该事件对象已经被毁灭了。.
. C$ K9 F! K% n( `wrError 在等待过程中有异常产生,要知道具体产生的错误要查看 TEvent的LastError
2 A X1 y5 h# [8 d属性。 % J# r; h$ \1 r) c" @) n
% d" x0 m4 o/ s5 m+ v W3? TCriticalSection
+ `" T; [& U: @, n3 f2 F; |这个相当于WIN32编程中的临界区。 ( f8 A3 _# @. y2 K& S1 }' E; A
在多线程编程中,多个线程需要访问同一个公用变量的时候。 , f8 v! V3 l+ R0 y
% L1 a! V4 M$ E7 r1 N来保证访问的正确性。对公用变量访问的代码写在Enter();和Leave()之间。
( o/ v' B3 A7 p- S0 ?比如有个公用变量 Count;
! K8 ?4 {7 B0 L5 c x5 X以下代码 : ; N# f& {2 f; i! H1 s+ j* {
TCriticalSection * pSection=new TCriticalSection();
& X! k: K: [5 Y. ^9 D4 v pSection->Enter(); 1 Q! T8 F. U3 Q& S: f1 r7 h
Count++;
% h" n8 t* C# Y$ n$ I9 s+ j pSection->Leave();
$ o! G$ W* {4 o* E; t) Z& wdelete p; 1 S) ]9 i3 ? Y
$ \7 |! Q6 ~. d1 K; fEnter()方法进入临界区,对其中的公用变量加锁。
' @* G* r# x2 i% C/ U* `0 x' r. `! DLeave()方法离开临界区,对其中的公用变量解锁。 8 W# E X1 U0 m4 G9 n
1 F6 t/ y5 ^7 u. W
- a& X3 t% n$ z2 h {# x: @4 K$ I9 X4.TMultiReadExclusiveWriteSynchronizer
2 \4 p6 ]6 d0 m# X; B6 ]用来处理类似于多个生产者和多个消费者的问题。这里的消费者是指 x- E1 s% s, c+ Y/ c
对公用变量进行读操作的线程。
- f- l$ T4 W1 O' t1 w9 W7 J生产者是对公用变量进行写操作的线程。</P>3 \; B3 k0 B( d7 Y# C
< >四个方法。
* ^( D' T( K* I4 X BeginRead- r, |( F& \. B1 k; m3 q. f6 [
EndRead
& L/ `8 \ y! j这两个方法用于消费者。
2 H3 Y- p9 u& [; |# W8 p& R BeginWrite! E3 M0 q" v& w! m" @% v4 E8 d" N/ b
EndWrite( N) S' O+ M8 I7 W
这两个方法用于生产者。</P>
0 k/ J: v+ ?5 Y; Z+ W% i9 e5 B< >使用的时候就是要把这个TMutiReadExclusiveWriteSynchronizer 定义一个全局变量。
& @7 a- K7 e' I) C; ?# h$ \然后在其他线程中访问他。</P>9 U! ?/ r( U& {4 u
3 b& t# S* _5 I8 g$ V
< >
7 D: i$ S# U3 m2 K0 g9 O </P> |
zan
|