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

我的地盘我做主
该用户从未签到
 |
< >最近在写一个程序用到了多线程,所以对CB下的多线程有一定的学习。9 R0 F8 E" c! Q+ t" b
现在把自己的一些心得讲一下。水平有限,写的很粗略,请大家见谅。</P>- q- J) Y! u$ V: R" [
< >CB相对于VC来说,在CB下写多线程程序是很简单的。不仅是VCL中有TThread这个类。封装了那些关于多线程的WINDOW API。我觉得更方便的是他提供了0 _. A5 u. f8 G# E) ^
直接访问主VCL线程中对象的能力。可以很容易的和主线程中的窗体,控件
/ x& C# v; Z$ y, Q打交道。和单线程的方式没有太多区别。只是在有多个线程都要访问主线程
5 W" a& I7 m, {' U; e中的对象(比如访问同一个窗体上的StringGrid).只要用Thread的Synchronize方法来调用那段访问主VCL线程的代码(具体请看帮助),我们就不用担心访问冲突的问题了。而且对于多线程的同步和互斥,CB也对WINDOW 编程中那些机制进行了封装。比如对临界区CriticalSection封装为TCriticalSection.事件Event封装为TEvent.这些类相当简单好用。
& h/ [2 f5 \6 B- J! S$ D6 M) w下面就是我觉得比较重要的几点,供大家参考.</P>
2 z" t% t8 a S% A( {3 n< >7 H8 y9 j8 p( \- h8 W. U
1。TThread的WaitFor方法。是等待一个线程返回。其返回值在这个线程里可以任意设定。以便在该线程返回的时候让调用他的线程知道他的运行情况。 5 [, Y3 I- B! J2 Z/ z9 c" f. ^9 R
* J3 \6 S8 K* G# v! r# I* g9 b0 g( R7 }
在TThread的 OnTerminate事件中做线程的清除工作。他不是线程运行的一部分。
" S3 e0 d) q& T% K0 N& o9 o1 D而是主VCL线程的一部分。所以在其中不能访问Thread的局部变量(如 int __thread i) : R* W6 S1 [& V
你可以把清楚代码写在这里,不用管现在在EXCUTE()方法执行到了哪个地方。
% P8 k( |. X5 `7 v这么看起来有点类似于C++里的 finally 块的作用。
" X" L6 S( L% ?: r, |
7 b8 S; v- G& P2。TEvent很重要。实现线程的同步。WaitFor(int Timeout)功能类似于 + A+ ^1 l8 F7 G$ p% u
WINDOW API WaitforSingleObject().返回值包括:
$ P9 O3 B0 S. k) f/ H ^! P其中参数Timeout可以设为INFINITE表示永久等待,但这样,程序很容易死在这里。
) g2 [/ r+ p. U5 A4 t1 N1 q0 h- f
: [( ?9 p$ Z- pwrSignaled 该事件发生(成功返回).
) f& g5 D w [: FwrTimeout 等待超时.
, a9 u2 o0 ~: kwrAbandoned 在该事件的超时期限到达前,该事件对象已经被毁灭了。. 5 W7 H/ H6 O. j h$ P- C) Y, p
wrError 在等待过程中有异常产生,要知道具体产生的错误要查看 TEvent的LastError / |6 h$ N8 a" U. E3 R1 D# _5 s. `2 X
属性。 6 f4 [' G' i$ g; M- f& C
$ |( ^7 d8 J9 b$ U# I O3? TCriticalSection 2 |$ N( u3 L9 L8 C6 K9 b1 `
这个相当于WIN32编程中的临界区。 2 N$ D# C0 ~ P G S6 g/ g% G2 w
在多线程编程中,多个线程需要访问同一个公用变量的时候。 $ Z' g7 @$ U: Y8 P7 F( H' g7 p6 u
% N) ^# \/ E% b3 h来保证访问的正确性。对公用变量访问的代码写在Enter();和Leave()之间。
. }6 _9 }& s$ O4 d2 g* w) P0 ?" v! T比如有个公用变量 Count; - ?) s+ \. _6 N: O2 \8 o
以下代码 : $ x/ k! |) k& y# o
TCriticalSection * pSection=new TCriticalSection(); / |. H: b( a: @$ H
pSection->Enter(); : T: Z6 h+ ~6 t5 B) `
Count++; " T4 i$ ]. _; D6 h2 `4 |8 e$ p G7 N
pSection->Leave();
/ T6 K8 I) A+ \+ Kdelete p;
+ _0 D% u# W0 e1 n1 d- _4 c$ h
7 F6 X! _$ M& L6 A& H4 @Enter()方法进入临界区,对其中的公用变量加锁。 ; z6 m2 s+ c, {% u7 K" Y
Leave()方法离开临界区,对其中的公用变量解锁。
8 s* p. t4 p, d* V( o
- j" v- C# ], M
, u+ o3 {/ O9 [; f4.TMultiReadExclusiveWriteSynchronizer
* n$ k1 K2 Y- [用来处理类似于多个生产者和多个消费者的问题。这里的消费者是指4 _* z0 b- [; v5 |- S
对公用变量进行读操作的线程。
; ^$ e: W. j+ N U( g生产者是对公用变量进行写操作的线程。</P>1 M9 ~7 {. l% a2 K8 `
< >四个方法。$ i X6 P* N7 m8 @
BeginRead1 L+ Y' l, w9 X: [8 [
EndRead
1 p; d. {. U. `) K! m8 L这两个方法用于消费者。7 s6 u: |: `" m) o& Y4 Y
BeginWrite4 l! U% I1 d5 Z% q" z* u
EndWrite
h, w. y2 D X4 f这两个方法用于生产者。</P>! |: Z0 ?# G: B( H4 }' u
< >使用的时候就是要把这个TMutiReadExclusiveWriteSynchronizer 定义一个全局变量。
( [! r" o' s; u; [2 Z然后在其他线程中访问他。</P>$ |& D# \3 b. y8 Q: A( [( n6 O/ X
% G4 B8 y+ t/ p9 n6 e7 a5 y9 j< >
: o+ m0 }( b! ?2 i) Q& R) I </P> |
zan
|