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

我的地盘我做主
该用户从未签到
 |
< >最近在写一个程序用到了多线程,所以对CB下的多线程有一定的学习。, I; |& l6 q ^" A7 P
现在把自己的一些心得讲一下。水平有限,写的很粗略,请大家见谅。</P>
0 l( c% R( d: E< >CB相对于VC来说,在CB下写多线程程序是很简单的。不仅是VCL中有TThread这个类。封装了那些关于多线程的WINDOW API。我觉得更方便的是他提供了
- d, i$ f5 g4 C( Q+ e2 L直接访问主VCL线程中对象的能力。可以很容易的和主线程中的窗体,控件
& J3 n: T. c1 C2 A2 N: x, e打交道。和单线程的方式没有太多区别。只是在有多个线程都要访问主线程
! R" C |* }2 }. ]2 j7 n8 m/ j中的对象(比如访问同一个窗体上的StringGrid).只要用Thread的Synchronize方法来调用那段访问主VCL线程的代码(具体请看帮助),我们就不用担心访问冲突的问题了。而且对于多线程的同步和互斥,CB也对WINDOW 编程中那些机制进行了封装。比如对临界区CriticalSection封装为TCriticalSection.事件Event封装为TEvent.这些类相当简单好用。
' R, Q( M1 x y/ U0 T& n下面就是我觉得比较重要的几点,供大家参考.</P>
+ [% X1 s; K/ F4 a3 k< >
% C" H& D6 l0 ]+ e+ R( D+ Y1。TThread的WaitFor方法。是等待一个线程返回。其返回值在这个线程里可以任意设定。以便在该线程返回的时候让调用他的线程知道他的运行情况。
3 ^$ M) ^0 Q( H$ O* c4 x8 |1 z E$ w( d. j6 U. Y+ L
在TThread的 OnTerminate事件中做线程的清除工作。他不是线程运行的一部分。
0 P) n# _3 p7 C: {- @6 ?+ |而是主VCL线程的一部分。所以在其中不能访问Thread的局部变量(如 int __thread i) ! p% m! g* f' {& `1 D4 H
你可以把清楚代码写在这里,不用管现在在EXCUTE()方法执行到了哪个地方。 8 F, Y$ N, g7 b! C* F2 Z4 s( k9 j- O
这么看起来有点类似于C++里的 finally 块的作用。
1 Z* @. W, L% h' K4 Q
% @* y# B7 ?: t& Y5 Q( s1 i: S! X2。TEvent很重要。实现线程的同步。WaitFor(int Timeout)功能类似于 / S) u8 r0 y, z1 T6 B
WINDOW API WaitforSingleObject().返回值包括:
+ O# Y, h$ j* U: r9 }( m其中参数Timeout可以设为INFINITE表示永久等待,但这样,程序很容易死在这里。
8 [% p* W: @2 X6 V& m2 ]6 U
7 l1 L8 l- x, j6 E3 F0 X, F* ^8 B% HwrSignaled 该事件发生(成功返回). ; S+ V' H( R$ d# ?6 k6 C
wrTimeout 等待超时. t% x' Y& c) f
wrAbandoned 在该事件的超时期限到达前,该事件对象已经被毁灭了。. $ e- s# d4 G+ f) e
wrError 在等待过程中有异常产生,要知道具体产生的错误要查看 TEvent的LastError % U- ^) [' n6 }. j4 _
属性。
- i0 [2 \; Q, g3 n0 W/ t d
5 v- ^: j9 j) Y! {3? TCriticalSection
2 V. ?: b& @- `6 ?! p这个相当于WIN32编程中的临界区。 # k4 f4 X* H+ A8 ]7 k7 ?" L* m& Q0 c
在多线程编程中,多个线程需要访问同一个公用变量的时候。
* l3 z3 ?0 A; i1 b0 S; s' `* Q5 m ! V0 w# `9 ?1 a! g* g
来保证访问的正确性。对公用变量访问的代码写在Enter();和Leave()之间。 0 q; u, s4 t; b4 Y7 Y$ }# t9 \
比如有个公用变量 Count; : ]) _. \; ^6 t, M1 w# N
以下代码 : + I8 D% m; l8 s# C) C
TCriticalSection * pSection=new TCriticalSection(); $ ]: p9 T+ y7 J) C) u9 d$ s% D0 k
pSection->Enter(); : j' v0 {8 m0 ^, \" i: H3 m
Count++;
$ }/ x2 }2 p% {+ L; R pSection->Leave();
3 y9 t! Y& ]) i/ `0 ldelete p;
1 k* \: C+ p( F 2 O7 r. m( R- `6 a4 z V
Enter()方法进入临界区,对其中的公用变量加锁。
: ~; {' b1 `1 k8 N) ^Leave()方法离开临界区,对其中的公用变量解锁。
* H7 o' N2 i# p) F
& T) Z& Y) F; c) B0 I 4 K* h4 Y; `# K2 I- g* p3 n
4.TMultiReadExclusiveWriteSynchronizer x" u, l0 s; r
用来处理类似于多个生产者和多个消费者的问题。这里的消费者是指
* u# i( i% \5 y; c# r4 w; E$ K对公用变量进行读操作的线程。0 e( T) d. ?6 r( ?. V% e% S
生产者是对公用变量进行写操作的线程。</P>1 g- S- x$ t& J- j
< >四个方法。' _( q( Q# g: y2 f& s
BeginRead
9 F' `4 b$ ~2 X$ d, ^; y EndRead
j7 _/ l' w' g) ^) x6 [这两个方法用于消费者。
. p+ ~$ O# T4 }0 Q K. B- A BeginWrite9 W* r8 v: ?. g; N) ?2 w
EndWrite
8 K5 ~$ g/ A4 r/ ^这两个方法用于生产者。</P>$ _8 H, `8 y# E
< >使用的时候就是要把这个TMutiReadExclusiveWriteSynchronizer 定义一个全局变量。
, C( w, J9 b7 D- Q' b然后在其他线程中访问他。</P>
q) Y$ D5 f2 Y, P: d
" z# v6 O0 D! o9 `. y. L1 g# F) n< >
9 A: C+ D. @% p* Z, {* Y </P> |
zan
|