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

我的地盘我做主
该用户从未签到
 |
< >最近在写一个程序用到了多线程,所以对CB下的多线程有一定的学习。/ v; k4 g1 u0 i+ ]3 A: P2 Y' S
现在把自己的一些心得讲一下。水平有限,写的很粗略,请大家见谅。</P>: v+ c* r& I1 A% j n
< >CB相对于VC来说,在CB下写多线程程序是很简单的。不仅是VCL中有TThread这个类。封装了那些关于多线程的WINDOW API。我觉得更方便的是他提供了. U% r/ C- k* n7 l4 Q9 e) }
直接访问主VCL线程中对象的能力。可以很容易的和主线程中的窗体,控件 ?+ c/ z7 z4 ?- M) c
打交道。和单线程的方式没有太多区别。只是在有多个线程都要访问主线程
; F7 o7 J9 K5 O; k) M, h2 s中的对象(比如访问同一个窗体上的StringGrid).只要用Thread的Synchronize方法来调用那段访问主VCL线程的代码(具体请看帮助),我们就不用担心访问冲突的问题了。而且对于多线程的同步和互斥,CB也对WINDOW 编程中那些机制进行了封装。比如对临界区CriticalSection封装为TCriticalSection.事件Event封装为TEvent.这些类相当简单好用。% H `# P. A6 a P/ G9 M
下面就是我觉得比较重要的几点,供大家参考.</P>, P; M8 U, {/ u. c& c
< >
0 b7 D% {, D- P3 M6 p/ p) g1。TThread的WaitFor方法。是等待一个线程返回。其返回值在这个线程里可以任意设定。以便在该线程返回的时候让调用他的线程知道他的运行情况。
6 `* X7 a9 ^- a0 Q. N9 m . T& F- E* g! g8 D8 ?6 }0 `
在TThread的 OnTerminate事件中做线程的清除工作。他不是线程运行的一部分。 5 E ]* f- Y2 w e
而是主VCL线程的一部分。所以在其中不能访问Thread的局部变量(如 int __thread i) 7 x5 Q8 A+ ~6 B! ^6 B8 d) {+ `
你可以把清楚代码写在这里,不用管现在在EXCUTE()方法执行到了哪个地方。
4 u% }0 c, b; k! S+ U, ^这么看起来有点类似于C++里的 finally 块的作用。
( Z' W2 [- V4 ]4 k, h. L 2 [# \! _ Z( |9 F' a5 K" P
2。TEvent很重要。实现线程的同步。WaitFor(int Timeout)功能类似于
4 x- O2 b; D C# j# z) ZWINDOW API WaitforSingleObject().返回值包括: & h. l+ k' ^7 E; D4 \) b) f
其中参数Timeout可以设为INFINITE表示永久等待,但这样,程序很容易死在这里。
- I0 n7 }/ s2 O! n1 F) M8 n9 S% w % b! @; I& r' f) v; Y8 p
wrSignaled 该事件发生(成功返回).
0 q$ d; H8 X' y8 X% XwrTimeout 等待超时. # a) h4 ^9 Y; I* O0 \+ G) u1 c
wrAbandoned 在该事件的超时期限到达前,该事件对象已经被毁灭了。.
6 d( v- m) d/ N% ^wrError 在等待过程中有异常产生,要知道具体产生的错误要查看 TEvent的LastError & D5 t" a" K6 e1 l6 k. r
属性。 * a" O2 {# J. c* K& o
, _+ H5 z" M7 X7 o; x! L
3? TCriticalSection
- I! T1 p, r- A2 F" V8 K这个相当于WIN32编程中的临界区。
8 O0 l) F! k6 l; U在多线程编程中,多个线程需要访问同一个公用变量的时候。
& q7 O$ `1 \! q4 b, Z l0 D
0 `) D R- G- X' L8 C来保证访问的正确性。对公用变量访问的代码写在Enter();和Leave()之间。
# U1 f7 V/ S1 Z0 Y X- S5 n比如有个公用变量 Count;
- T' k$ A' E- M7 e& I以下代码 : w; C" z4 O* ^ k9 K
TCriticalSection * pSection=new TCriticalSection();
* U) j! F( X/ w2 |% k d7 ` pSection->Enter(); - {' ^" i. ]( b* V% F2 r
Count++; . o0 B& ~2 w' X/ W
pSection->Leave();
, L1 ]8 t; T& e; _" _delete p; " X Y) E, M+ e, |5 t1 L* p
3 A3 a& d4 i# }8 d7 O6 n v$ h6 C
Enter()方法进入临界区,对其中的公用变量加锁。
. L2 Z5 {1 a+ g9 ^' ]Leave()方法离开临界区,对其中的公用变量解锁。
2 |+ w# y( U, {
. M; r4 `3 x8 s$ O$ O
3 B: l/ P9 T( a4.TMultiReadExclusiveWriteSynchronizer
6 |9 K4 i% R/ R6 g- J% b用来处理类似于多个生产者和多个消费者的问题。这里的消费者是指, }7 j, T2 B7 Q7 h
对公用变量进行读操作的线程。# k% ?# t _1 U8 q) d/ M/ G4 x
生产者是对公用变量进行写操作的线程。</P>" i( y, l/ {6 N; U
< >四个方法。
5 P8 h! Y( Y4 Z+ W. r6 m$ A BeginRead& e9 y' m$ c) [! [7 B: T: h/ v
EndRead
9 h/ } n) X! H8 @0 \# l4 H5 Q这两个方法用于消费者。
* A" x# s* z# k8 c4 d: N8 _! G BeginWrite
2 O) t) r# m+ o EndWrite) M, _% D; Q) e1 R
这两个方法用于生产者。</P>
) p3 t$ m, J! b7 o' i" o< >使用的时候就是要把这个TMutiReadExclusiveWriteSynchronizer 定义一个全局变量。 b( |9 E( k$ h* |$ a8 v) d
然后在其他线程中访问他。</P>/ q, F4 P0 \" w( ?0 e
/ \0 n* |: L1 F* ^) T* M' \< >- ]. z, L% }( s! I0 c7 q) Q
</P> |
zan
|