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

我的地盘我做主
该用户从未签到
 |
< >最近在写一个程序用到了多线程,所以对CB下的多线程有一定的学习。
: g/ C7 P/ H# k/ O! s8 I1 E现在把自己的一些心得讲一下。水平有限,写的很粗略,请大家见谅。</P>" ~9 e' j6 g' w5 r: }" y
< >CB相对于VC来说,在CB下写多线程程序是很简单的。不仅是VCL中有TThread这个类。封装了那些关于多线程的WINDOW API。我觉得更方便的是他提供了. C" V+ o1 v* Z: L) A! C4 K, r" Q
直接访问主VCL线程中对象的能力。可以很容易的和主线程中的窗体,控件5 s6 |2 K: h+ N$ O' o
打交道。和单线程的方式没有太多区别。只是在有多个线程都要访问主线程7 v" l9 V+ k. w1 [
中的对象(比如访问同一个窗体上的StringGrid).只要用Thread的Synchronize方法来调用那段访问主VCL线程的代码(具体请看帮助),我们就不用担心访问冲突的问题了。而且对于多线程的同步和互斥,CB也对WINDOW 编程中那些机制进行了封装。比如对临界区CriticalSection封装为TCriticalSection.事件Event封装为TEvent.这些类相当简单好用。' w' f+ ?4 G; Q* `+ W/ v
下面就是我觉得比较重要的几点,供大家参考.</P>) t) \6 P* \0 l0 G' z$ n6 r
< >
0 I6 } g# P$ O; K+ |4 [3 t1。TThread的WaitFor方法。是等待一个线程返回。其返回值在这个线程里可以任意设定。以便在该线程返回的时候让调用他的线程知道他的运行情况。 * y4 |3 C, S: k `
" ?, p3 b% J5 W/ P/ j* v
在TThread的 OnTerminate事件中做线程的清除工作。他不是线程运行的一部分。
5 b' Y F5 `: \而是主VCL线程的一部分。所以在其中不能访问Thread的局部变量(如 int __thread i) " _$ z. X# h. c# W' u s
你可以把清楚代码写在这里,不用管现在在EXCUTE()方法执行到了哪个地方。
6 @. i! r( X2 a) D. U8 C这么看起来有点类似于C++里的 finally 块的作用。 0 I: ^# q/ }6 B9 v3 m, P, q
5 }* }4 B: g4 f) P: d2。TEvent很重要。实现线程的同步。WaitFor(int Timeout)功能类似于 4 k3 q) Y+ c3 a& {! _- b
WINDOW API WaitforSingleObject().返回值包括: ( y- T6 `2 p. g2 |8 T( P" h
其中参数Timeout可以设为INFINITE表示永久等待,但这样,程序很容易死在这里。 3 ]$ t ]- `% E# u7 [
) E. U5 M3 B' p, R% O
wrSignaled 该事件发生(成功返回).
1 a: R0 n7 D9 c4 l6 YwrTimeout 等待超时.
5 V4 }# x: E! w' ^8 Z% _wrAbandoned 在该事件的超时期限到达前,该事件对象已经被毁灭了。. * t9 _, w) C1 W2 g/ l: a
wrError 在等待过程中有异常产生,要知道具体产生的错误要查看 TEvent的LastError J/ Y! A, ~/ t0 F
属性。
5 G& \5 H4 b5 B9 g; x. H / ]) y8 v0 q2 B9 l. [" b0 N
3? TCriticalSection
) k* c r# g: E1 f% k% o0 L Y5 t( o0 K这个相当于WIN32编程中的临界区。 ) V# z0 ?* `& f T! b
在多线程编程中,多个线程需要访问同一个公用变量的时候。 7 \/ b. y8 f* a4 i6 E
) X* D' F/ _7 d9 W% j, k来保证访问的正确性。对公用变量访问的代码写在Enter();和Leave()之间。 - B+ Y' n5 Z# a/ T& P$ y' Y9 _
比如有个公用变量 Count;
$ I6 l$ R E$ Q5 y k/ q8 F以下代码 : 8 A) H) l; [) D. Z: J
TCriticalSection * pSection=new TCriticalSection();
7 K. f' _" K& q( [ pSection->Enter(); ) p u7 z' w. f- _8 u9 C5 `
Count++;
" [3 V* u4 Q8 t/ r8 g0 c1 U pSection->Leave(); 5 K! J5 C, G9 v. f+ L
delete p;
# t. `3 a) t; K( a* M B7 u0 ^; j ) b, D/ u; W* u8 p9 m$ A
Enter()方法进入临界区,对其中的公用变量加锁。 ' S/ F/ i, u: O5 F
Leave()方法离开临界区,对其中的公用变量解锁。 ( l ~/ |) p; H3 n: H0 X
& k) ?. d: ~4 J+ l$ N+ m
$ V: G- Z) b% {3 c% Q; h& N. Y4.TMultiReadExclusiveWriteSynchronizer
3 C& J8 a, H$ ^' W; C6 E' J用来处理类似于多个生产者和多个消费者的问题。这里的消费者是指
- n1 ^9 A/ d* i对公用变量进行读操作的线程。7 |6 d7 \9 {# C, E4 |; e
生产者是对公用变量进行写操作的线程。</P># q/ V7 B1 Q, e/ Q/ w. ~+ L
< >四个方法。5 d' I6 L) [6 E+ K2 s6 g ^0 d( Y
BeginRead! Z: D3 Z2 z4 H5 r
EndRead
/ {, y1 ~- X* Y& }" {这两个方法用于消费者。
* z2 o5 E0 M" M$ y0 ]6 Y BeginWrite
) h3 s5 ^3 U k2 U6 m EndWrite2 _3 z3 [/ p. M" _$ d" D
这两个方法用于生产者。</P>0 T& d1 l; ]+ b
< >使用的时候就是要把这个TMutiReadExclusiveWriteSynchronizer 定义一个全局变量。
1 n% g9 ?+ p. |" s2 U( e然后在其他线程中访问他。</P>
9 P# Z: Z. P$ }0 W/ Y1 T. O
1 W( T# _- p7 o< >
* j- [8 L4 K3 g, b1 [ </P> |
zan
|