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

我的地盘我做主
该用户从未签到
 |
< >最近在写一个程序用到了多线程,所以对CB下的多线程有一定的学习。/ l% @0 [1 g+ f6 J+ e9 ?; F
现在把自己的一些心得讲一下。水平有限,写的很粗略,请大家见谅。</P>1 T- J8 W6 v! Q: l) K) P
< >CB相对于VC来说,在CB下写多线程程序是很简单的。不仅是VCL中有TThread这个类。封装了那些关于多线程的WINDOW API。我觉得更方便的是他提供了
+ z, N1 X# i5 Q. |+ Z直接访问主VCL线程中对象的能力。可以很容易的和主线程中的窗体,控件6 n( K b# P. ~$ M. _' `
打交道。和单线程的方式没有太多区别。只是在有多个线程都要访问主线程
8 V$ n- _, |9 e- M中的对象(比如访问同一个窗体上的StringGrid).只要用Thread的Synchronize方法来调用那段访问主VCL线程的代码(具体请看帮助),我们就不用担心访问冲突的问题了。而且对于多线程的同步和互斥,CB也对WINDOW 编程中那些机制进行了封装。比如对临界区CriticalSection封装为TCriticalSection.事件Event封装为TEvent.这些类相当简单好用。5 L! _) o' ]; b) a6 T! b: d
下面就是我觉得比较重要的几点,供大家参考.</P>: x e+ r( X' y1 @$ B- }' U
< >
0 C5 B' r" g; R0 a& W! M2 q1。TThread的WaitFor方法。是等待一个线程返回。其返回值在这个线程里可以任意设定。以便在该线程返回的时候让调用他的线程知道他的运行情况。 6 D2 E/ K2 l2 Z" B
5 X7 I6 ]3 `! \4 j
在TThread的 OnTerminate事件中做线程的清除工作。他不是线程运行的一部分。 , F9 b. g# a! Y, e7 e: U6 Y: x
而是主VCL线程的一部分。所以在其中不能访问Thread的局部变量(如 int __thread i)
) G( U9 h" Z1 t3 X4 }- |; E: i你可以把清楚代码写在这里,不用管现在在EXCUTE()方法执行到了哪个地方。
! ?" Y$ ^9 ]2 B( T这么看起来有点类似于C++里的 finally 块的作用。 ( n' a0 m. [# N
" Q/ Z y8 |3 ]4 ?/ |. w2。TEvent很重要。实现线程的同步。WaitFor(int Timeout)功能类似于 1 G ?. y; s0 J x: H# r+ D
WINDOW API WaitforSingleObject().返回值包括: 3 r( q% p- D6 c1 u" O
其中参数Timeout可以设为INFINITE表示永久等待,但这样,程序很容易死在这里。
" M, Q1 E$ C1 d8 k9 |# a2 @/ \
' z( c7 M6 M' P0 k WwrSignaled 该事件发生(成功返回).
7 p" I' h1 f! L( BwrTimeout 等待超时.
/ H! g" \- a, R3 {- kwrAbandoned 在该事件的超时期限到达前,该事件对象已经被毁灭了。.
( M) X" s% i% O3 Y1 j. P+ SwrError 在等待过程中有异常产生,要知道具体产生的错误要查看 TEvent的LastError # N, W1 y1 D8 N) u; [3 @1 P* O
属性。 ( i: b- U" x' e8 y6 X
9 ?' b+ Y3 P, V4 Y% o+ D5 {- i; E
3? TCriticalSection ! _5 a; K0 L: v6 E4 _5 l3 B
这个相当于WIN32编程中的临界区。
X; f y" G5 l) i3 y9 M在多线程编程中,多个线程需要访问同一个公用变量的时候。
' n& s8 M9 N) k! }& L8 I5 k% `# o 1 L6 o+ V4 a' `# }! Y6 f6 B' d: }0 K
来保证访问的正确性。对公用变量访问的代码写在Enter();和Leave()之间。
+ Z; ]7 l+ _7 W+ x. s比如有个公用变量 Count; + v9 B: k+ g" T$ R1 p
以下代码 : ! E$ x6 g. c: f: c8 `0 z
TCriticalSection * pSection=new TCriticalSection();
4 i. f8 g0 e% F* r q5 W( d pSection->Enter(); ) ^+ B; ^# P) H# g
Count++;
, s) [8 w, l1 J5 X pSection->Leave(); 2 t8 a3 F+ K8 y3 x+ R2 F( A
delete p; ) x0 h; H8 K3 I9 S5 ^
, v, N1 u1 k k1 B
Enter()方法进入临界区,对其中的公用变量加锁。
. }1 M7 } D7 B8 H FLeave()方法离开临界区,对其中的公用变量解锁。 ) Q! A8 b, X0 G H* @, z2 J
0 C5 y# z k" N1 T5 |
. S" W5 _3 \4 d4.TMultiReadExclusiveWriteSynchronizer
9 ?3 l+ N1 Z3 \* e T' P用来处理类似于多个生产者和多个消费者的问题。这里的消费者是指
7 A+ H2 Q8 L4 h$ H6 I9 Z+ t/ Z' U对公用变量进行读操作的线程。2 m: i. p: v6 W" r. n/ R
生产者是对公用变量进行写操作的线程。</P>+ r9 I U* |5 H7 f! @2 C
< >四个方法。
1 ]: W' F$ L$ f3 O0 Q9 }6 H2 i- q BeginRead
5 n. ^8 Y4 U! D9 Q EndRead9 k$ p& t: t! h v; h
这两个方法用于消费者。' \5 K/ K. p [
BeginWrite
2 V! d6 g1 [( L5 D EndWrite" q% W7 j4 Q' m+ }9 I8 p, X* Z4 m
这两个方法用于生产者。</P>
; v) A+ S/ B2 r- U< >使用的时候就是要把这个TMutiReadExclusiveWriteSynchronizer 定义一个全局变量。5 A0 B2 Y8 l* X% E
然后在其他线程中访问他。</P>
8 @: v1 j7 } q* Y9 c2 \
* _0 {. }% s( b$ \< >( a$ h0 f0 {3 J+ B' S
</P> |
zan
|