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

我的地盘我做主
该用户从未签到
 |
< >最近在写一个程序用到了多线程,所以对CB下的多线程有一定的学习。
# ~+ y3 E. |# E, }" @2 x现在把自己的一些心得讲一下。水平有限,写的很粗略,请大家见谅。</P>
* F/ R- S6 H S g+ {< >CB相对于VC来说,在CB下写多线程程序是很简单的。不仅是VCL中有TThread这个类。封装了那些关于多线程的WINDOW API。我觉得更方便的是他提供了
8 b0 H" o0 M& e6 C4 U% _( S" z# c直接访问主VCL线程中对象的能力。可以很容易的和主线程中的窗体,控件0 |& p: k7 J* p( w( T P
打交道。和单线程的方式没有太多区别。只是在有多个线程都要访问主线程0 z! V: M: z Z
中的对象(比如访问同一个窗体上的StringGrid).只要用Thread的Synchronize方法来调用那段访问主VCL线程的代码(具体请看帮助),我们就不用担心访问冲突的问题了。而且对于多线程的同步和互斥,CB也对WINDOW 编程中那些机制进行了封装。比如对临界区CriticalSection封装为TCriticalSection.事件Event封装为TEvent.这些类相当简单好用。2 e3 ^' Z0 m) z. F
下面就是我觉得比较重要的几点,供大家参考.</P>
9 S. D) K- M# ?- C+ S. {8 B( F' S< >
5 k8 ]" v; D6 E' U3 ~; K' S1。TThread的WaitFor方法。是等待一个线程返回。其返回值在这个线程里可以任意设定。以便在该线程返回的时候让调用他的线程知道他的运行情况。
( U8 x6 @/ m4 c4 N1 \7 G & ?" [# m7 ]9 k3 V/ }
在TThread的 OnTerminate事件中做线程的清除工作。他不是线程运行的一部分。 5 A! B( _8 \1 Z
而是主VCL线程的一部分。所以在其中不能访问Thread的局部变量(如 int __thread i)
5 ?* a# ~! Q, P) R# {2 |' a8 z你可以把清楚代码写在这里,不用管现在在EXCUTE()方法执行到了哪个地方。
* p3 z$ T# ]) }& E( j1 N/ W: L1 r这么看起来有点类似于C++里的 finally 块的作用。
& M9 w& I$ U- M0 ~% C
9 E% C6 n" u9 p M% W2。TEvent很重要。实现线程的同步。WaitFor(int Timeout)功能类似于 * V/ s9 l/ l* ~4 b3 U8 {) v$ o
WINDOW API WaitforSingleObject().返回值包括: 6 g0 R Y; o2 N7 V' Q
其中参数Timeout可以设为INFINITE表示永久等待,但这样,程序很容易死在这里。
* F8 i! H- D6 f+ s5 U; i
7 _' P4 G1 q) W' A0 x' uwrSignaled 该事件发生(成功返回).
# l5 t. e& R, awrTimeout 等待超时.
+ \% m1 e7 L- x% twrAbandoned 在该事件的超时期限到达前,该事件对象已经被毁灭了。. 2 [. `$ F- g6 J. F4 [' l, T
wrError 在等待过程中有异常产生,要知道具体产生的错误要查看 TEvent的LastError
! F. |; \1 y0 E E" \( m属性。
. ^" {& O' u, L * v7 g b: P: d: q& h* D4 {$ Z- A
3? TCriticalSection % P [8 ?4 E, Y4 @3 r4 d4 n, A- i
这个相当于WIN32编程中的临界区。 F+ {/ W% I- v$ `
在多线程编程中,多个线程需要访问同一个公用变量的时候。
9 `2 F7 X: Q: T0 `* z' F, R " @; `3 j$ }- |; i6 F2 m5 S
来保证访问的正确性。对公用变量访问的代码写在Enter();和Leave()之间。
* Z) J( M5 p4 S. H比如有个公用变量 Count; 7 R# m- g2 U' E( [- s- Z' u
以下代码 : % [6 N" Q8 B& j6 {! l
TCriticalSection * pSection=new TCriticalSection(); 5 x* e% I/ g1 u: C8 f2 L1 |* t
pSection->Enter();
t' K) e$ `: P Count++;
, Z( r6 g6 P4 h7 S pSection->Leave(); ) L1 A L; G1 H1 A$ d% d6 d
delete p; % n2 ^& L8 s! ]! Z
, M* A! u, \" ~! D P' C
Enter()方法进入临界区,对其中的公用变量加锁。
* Q$ S; S! I$ c* VLeave()方法离开临界区,对其中的公用变量解锁。
1 ^/ ]* |0 M# [1 B0 ^
: u3 d' y/ f* B: E, X
+ ]( ^* P# c7 F5 m4 h) u4.TMultiReadExclusiveWriteSynchronizer
8 C+ O. T% H% S6 f9 L- B: [用来处理类似于多个生产者和多个消费者的问题。这里的消费者是指
7 n% f) A- b8 C2 |5 v7 K对公用变量进行读操作的线程。
8 o$ t8 Q. \- Y! N/ p/ C3 }0 a生产者是对公用变量进行写操作的线程。</P>
; w U% v# D% }, s2 {3 L! P& _< >四个方法。
3 X+ n1 Z: p M6 } BeginRead
9 G2 j. t9 \7 x9 Z" W EndRead
# m" w0 ^/ A, K1 ~, M$ a2 w! Y( F: t这两个方法用于消费者。9 F$ x& X' H1 s& ?7 C
BeginWrite6 h0 M O/ B& M: F+ c7 B: m
EndWrite, s8 y- z, R6 w
这两个方法用于生产者。</P>1 p9 j6 F* l0 H' p
< >使用的时候就是要把这个TMutiReadExclusiveWriteSynchronizer 定义一个全局变量。
2 Y) H- p/ Y4 I, y# e# E4 p然后在其他线程中访问他。</P>
$ a. W5 C, ?, D/ t, U
7 ~ e7 R$ H; ?8 N< >2 m8 Y4 n: n, Z. V
</P> |
zan
|