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

我的地盘我做主
该用户从未签到
 |
< >最近在写一个程序用到了多线程,所以对CB下的多线程有一定的学习。
5 y, I) y6 l0 h" X6 m. T现在把自己的一些心得讲一下。水平有限,写的很粗略,请大家见谅。</P>
( M. l! B6 I3 r< >CB相对于VC来说,在CB下写多线程程序是很简单的。不仅是VCL中有TThread这个类。封装了那些关于多线程的WINDOW API。我觉得更方便的是他提供了
8 O R6 }& o& P ?) f直接访问主VCL线程中对象的能力。可以很容易的和主线程中的窗体,控件
7 Q+ W. _1 X- R+ m9 m打交道。和单线程的方式没有太多区别。只是在有多个线程都要访问主线程0 |6 |. Q) Q, Z) \: p9 e! O" F
中的对象(比如访问同一个窗体上的StringGrid).只要用Thread的Synchronize方法来调用那段访问主VCL线程的代码(具体请看帮助),我们就不用担心访问冲突的问题了。而且对于多线程的同步和互斥,CB也对WINDOW 编程中那些机制进行了封装。比如对临界区CriticalSection封装为TCriticalSection.事件Event封装为TEvent.这些类相当简单好用。
* k' ?6 Y* M* E1 t$ ~1 e( ]下面就是我觉得比较重要的几点,供大家参考.</P>8 s) L4 N9 R$ o3 F T; S' A
< >
6 [! T. i, C" T9 O1。TThread的WaitFor方法。是等待一个线程返回。其返回值在这个线程里可以任意设定。以便在该线程返回的时候让调用他的线程知道他的运行情况。 % d. O$ I( h2 h7 | S6 d2 Q# ?
7 |1 l* M6 X- x5 r( h在TThread的 OnTerminate事件中做线程的清除工作。他不是线程运行的一部分。 , z F4 M3 J7 p# M
而是主VCL线程的一部分。所以在其中不能访问Thread的局部变量(如 int __thread i) 6 o: M, F: R0 o! o
你可以把清楚代码写在这里,不用管现在在EXCUTE()方法执行到了哪个地方。
8 \( ^& q9 ]5 h9 J7 @2 L8 _这么看起来有点类似于C++里的 finally 块的作用。 3 u; R, ]! {0 c
0 U" F' V4 M; P2 y. X7 z
2。TEvent很重要。实现线程的同步。WaitFor(int Timeout)功能类似于
: Y2 F2 k% _5 t0 I! x) sWINDOW API WaitforSingleObject().返回值包括: " b3 O* i2 J: l/ E9 [9 r
其中参数Timeout可以设为INFINITE表示永久等待,但这样,程序很容易死在这里。
! t% B4 ?2 X# |' h- g4 B' ^ - q! q, i0 H- J+ Z" N
wrSignaled 该事件发生(成功返回). / _7 c& u' R, ?6 M4 Q
wrTimeout 等待超时. 1 e/ b8 i- B& y6 }9 Z
wrAbandoned 在该事件的超时期限到达前,该事件对象已经被毁灭了。.
7 @# e9 K: R$ T, N CwrError 在等待过程中有异常产生,要知道具体产生的错误要查看 TEvent的LastError 8 } Y# _5 `& S: m" D
属性。 O9 d/ \3 k0 M* z% m: f
( }% m+ K0 w" u, T$ W% z. i4 m
3? TCriticalSection - Z8 g5 B3 U( p' |
这个相当于WIN32编程中的临界区。 4 c F$ {$ ^, `5 K. k
在多线程编程中,多个线程需要访问同一个公用变量的时候。
+ S7 T6 \. d2 U l; N - P- H- ^" J! i# o& ?$ j
来保证访问的正确性。对公用变量访问的代码写在Enter();和Leave()之间。 & H; L, P3 g" D; }
比如有个公用变量 Count; " j7 T* H! W) W9 c/ f8 T
以下代码 :
0 u% C4 ?0 |: ?# ]- rTCriticalSection * pSection=new TCriticalSection();
. q1 r3 ]$ a& V7 k/ @0 F1 e pSection->Enter(); % _- T' ]! K1 a% |
Count++;
' V3 j+ @, ?% { pSection->Leave();
/ s" n/ a6 x4 p4 idelete p; 9 J' U+ A6 V5 E" X! O0 G6 J2 `2 P/ ?! X
$ x5 ` V2 B& _8 Y' T! i* r$ u5 M
Enter()方法进入临界区,对其中的公用变量加锁。
" J, M2 O0 h7 RLeave()方法离开临界区,对其中的公用变量解锁。
- `6 J- g, k7 H. O ! F- j* Q$ G, k3 a% A
' ?7 e# s5 t# \& X6 }
4.TMultiReadExclusiveWriteSynchronizer
3 t. I Z' f8 }4 o4 c( b, W+ ^5 q1 k用来处理类似于多个生产者和多个消费者的问题。这里的消费者是指) S- U. N: b/ \0 q7 C# M
对公用变量进行读操作的线程。% R' t- r& O; m
生产者是对公用变量进行写操作的线程。</P>
0 y3 s \4 T' ~) e( A6 `< >四个方法。
0 V+ A/ z3 u P( s6 S+ z BeginRead+ S v# Z9 K) @ k% ]
EndRead
( W$ r0 q) u8 b- g, _这两个方法用于消费者。
5 L& d2 `7 }+ q& P" i BeginWrite' [5 Q/ x# R) s$ C2 W
EndWrite
@9 }1 s$ J- Y0 F这两个方法用于生产者。</P>
* U, Y/ ~9 \7 Q- r< >使用的时候就是要把这个TMutiReadExclusiveWriteSynchronizer 定义一个全局变量。) w+ |6 l: n. C0 E* A
然后在其他线程中访问他。</P>) [$ E4 M9 B( U1 H
9 S. n2 o; j2 E1 O9 j
< >/ v; c* V1 s! E; D: L
</P> |
zan
|