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

我的地盘我做主
该用户从未签到
 |
< >最近在写一个程序用到了多线程,所以对CB下的多线程有一定的学习。; F! ~! c, j4 m! J
现在把自己的一些心得讲一下。水平有限,写的很粗略,请大家见谅。</P>
( M8 Y' @/ {0 M< >CB相对于VC来说,在CB下写多线程程序是很简单的。不仅是VCL中有TThread这个类。封装了那些关于多线程的WINDOW API。我觉得更方便的是他提供了( s1 L+ y1 F' D4 a
直接访问主VCL线程中对象的能力。可以很容易的和主线程中的窗体,控件+ U/ k/ R, S& @* D( \$ r
打交道。和单线程的方式没有太多区别。只是在有多个线程都要访问主线程
/ O* E/ v" |' l: y中的对象(比如访问同一个窗体上的StringGrid).只要用Thread的Synchronize方法来调用那段访问主VCL线程的代码(具体请看帮助),我们就不用担心访问冲突的问题了。而且对于多线程的同步和互斥,CB也对WINDOW 编程中那些机制进行了封装。比如对临界区CriticalSection封装为TCriticalSection.事件Event封装为TEvent.这些类相当简单好用。
d4 x& \8 s$ J6 z9 s, O/ F& d, K6 }下面就是我觉得比较重要的几点,供大家参考.</P>; S T; E3 D2 o# a' z& q
< > K% |% o: r0 Y4 T5 u G5 i
1。TThread的WaitFor方法。是等待一个线程返回。其返回值在这个线程里可以任意设定。以便在该线程返回的时候让调用他的线程知道他的运行情况。 , y1 O) V$ w, U0 ]1 n
" J. G# [) x& |6 D+ W/ R# k! e
在TThread的 OnTerminate事件中做线程的清除工作。他不是线程运行的一部分。
* x% @1 k ?# ], k" Z7 t6 V而是主VCL线程的一部分。所以在其中不能访问Thread的局部变量(如 int __thread i)
1 F3 f' A' Q+ A5 [; C你可以把清楚代码写在这里,不用管现在在EXCUTE()方法执行到了哪个地方。
5 C. ?0 u* P4 F( u- r7 P! I: A这么看起来有点类似于C++里的 finally 块的作用。 ! X f5 _: h. h/ w5 D# }2 y! [
# ?5 p$ a" }6 }3 n5 q2。TEvent很重要。实现线程的同步。WaitFor(int Timeout)功能类似于 : T: q4 w6 N& H- [! j% l7 _$ l
WINDOW API WaitforSingleObject().返回值包括:
" f5 o+ @, A, a" }6 ]' _其中参数Timeout可以设为INFINITE表示永久等待,但这样,程序很容易死在这里。 ; I. ~1 `: ~% Y* }
$ ~6 I- U) Y- h8 G
wrSignaled 该事件发生(成功返回).
7 \' V% [/ C: u. A* ^2 V) b( }& zwrTimeout 等待超时.
+ c0 g/ v0 ]+ ?wrAbandoned 在该事件的超时期限到达前,该事件对象已经被毁灭了。. ( B; N; ?* R Q8 v7 ?& k+ H: g
wrError 在等待过程中有异常产生,要知道具体产生的错误要查看 TEvent的LastError
! ^8 E1 v B. r4 D属性。
) M3 ]! W, Y5 }& g$ B3 P" L 2 K1 _6 n0 U$ @: G
3? TCriticalSection q8 j$ x. I0 V# ?- S$ i
这个相当于WIN32编程中的临界区。 # M; }6 M' I: |) o
在多线程编程中,多个线程需要访问同一个公用变量的时候。
* d" R* D. c7 I2 H e9 U [9 _( A
( T7 c; p6 [4 ~/ S来保证访问的正确性。对公用变量访问的代码写在Enter();和Leave()之间。
# z) R7 p% D: @% `2 q7 k1 `比如有个公用变量 Count;
/ n! l: U! z5 m/ |2 {7 z2 h以下代码 :
! F) D# x9 @: g/ tTCriticalSection * pSection=new TCriticalSection(); ' x, D: Q/ ?( q: t8 p' b
pSection->Enter();
7 ]' T- q% \. ]& P* } ^3 Q: H% A% d% J Count++; 2 M5 W$ N, u# S# u- H$ z
pSection->Leave();
1 t9 ~, k7 N2 g, m* gdelete p; ) j$ m" f$ V, J0 D$ q- l. d" u
7 x$ e' ~/ h) R, j# P
Enter()方法进入临界区,对其中的公用变量加锁。
8 |0 s& k, m( u. }# sLeave()方法离开临界区,对其中的公用变量解锁。 ( ^" ?: b- K' r
2 F" `* { o( n8 |* \$ s* |
( G$ V$ a. ]- z6 l4.TMultiReadExclusiveWriteSynchronizer
; l5 Y" l; [3 N4 I3 f4 y用来处理类似于多个生产者和多个消费者的问题。这里的消费者是指
2 [, G1 a7 _% `! M' b% w对公用变量进行读操作的线程。
h, p) R @3 C4 c$ F生产者是对公用变量进行写操作的线程。</P>& |- B6 k. P/ n( h7 J+ @! u) U. B) u
< >四个方法。5 N' m5 g6 ?1 C# r2 [1 X9 j7 \ N- c
BeginRead
0 S* F: G8 I4 l: V! J EndRead1 r: ~( b4 K: }
这两个方法用于消费者。
# r' @7 D! Y, B; R3 O BeginWrite
3 J; @. V/ S6 Y% @4 S [& u( E EndWrite3 t- R/ a: ]! b$ y7 B" j# @
这两个方法用于生产者。</P>- I) M; B6 E; O6 V, w8 A
< >使用的时候就是要把这个TMutiReadExclusiveWriteSynchronizer 定义一个全局变量。 V' C, }& X5 b6 @
然后在其他线程中访问他。</P>. s/ `3 D! J+ z9 J
& p* g* i7 k4 n0 O3 Y< >0 A& z/ H. f3 p
</P> |
zan
|