数学建模社区-数学中国

标题: 用C++Builder4.0编写Win 95下的串行异步通信程序 [打印本页]

作者: 韩冰    时间: 2005-1-26 13:06
标题: 用C++Builder4.0编写Win 95下的串行异步通信程序
<>  </P>
/ B' t; R$ G6 ~: t$ a" m+ F+ r5 l6 _<>姜滨 </P>( b$ _. T. ?/ }* Y, f
<>  </P>
0 N8 j9 u" U" ~* P<>  ·串口操纵的基本方法· </P>, W: C* v) d+ R; V3 {
<>  </P>
. M7 \7 z# E3 E# F7 g+ ~( w7 @<>  </P>
" A, _. K& X4 C7 A# E8 V<>  在Win32下,对串口的操作就如同对文件一样打开或关闭,对串行数据的读 </P>. V  o; Z# d& X6 X0 d1 r
<>写可在用户定义的读写缓冲区中进行。具体使用的函数为: </P>
, f  x3 G4 R1 z" Z0 n2 ]& x<>  </P>
9 _7 L% G5 l9 l9 r! H) ?<>  首先用CreateFile( )打开通信串口,其中参数lpFileName指向串口逻辑名 </P>0 S: u& @* @. ?( u/ C1 l
<>,如“COM1”或“COM2”等,参数dwDesiredAccess定义文件的读写权限,一般 </P>& E$ v6 |5 Q0 L& Q( k7 o; H6 b
<>设为GENERIC—READ|GENERIC—WRITE;参数dwShareMode定义资源共享方式,此 </P>
  g  U3 I# K8 k/ }: K1 G<>处必须设为0,为独占方式;lpSecurityAttributes定义安全属性,Win 95下为 </P>! B; t* C- S2 s( L+ R
<>NULL;dwCreationDistribution定义文件创建方式;dwFlagsAndAttributes定义 </P>
1 o8 _+ R+ e, o/ T( Y3 P( h<>文件属性和标记,应设为FILE—FLAG—OVERLAPPED,表示异步通信方式; </P>8 c/ g6 p6 v2 M/ z+ q$ s" [
<>hTemplateFile 指向一个模板文件的句柄,在 Windows 95下为NULL。 </P>
' h' ]+ O$ J: E% d) j* T<>  </P>- B. A) o4 B; `4 y( W
<>  然后用BuildCommDCB( )和SetCommState( )函数通过通信设备控制块DCB( </P>
% d- f( |3 H6 c, ]! ^7 {<>Device Control Block)设置串口通信参数(如波特率、停止位、数据位、校验 </P>
6 x0 q& ^0 `: [  M/ s- ^<>位等),其中BuildCommDCB( )中的字符串参数lpDef 定义同DOS命令中MODE的参 </P># j. }2 Y  w2 x7 p* I5 _
<>数格式,关于DCB更具体的设置需要根据用户对数据流定义、握手信号及通信控 </P>
: `' A( T  Q& l2 e: }% ?7 c& H<>制要求具体定义,参见有关Windows技术资料。用GetCommState()可以得到当前 </P>/ F. Q. a4 `3 N2 L
<>的DCB参数值。如果需要还可通过SetCommTimeouts()和GetCommTomeouts()重新 </P>. Y# s) j  G, j8 h" I$ K% @2 F  @
<>设置读写的超时参数;读写缓冲区的设置使用SetupComm(),参数dwInQueue和 </P>) X/ h9 C) r& d( `1 C
<>dwOutQueue分别定义为输入和输出缓冲区的大小。 </P>7 B6 ?+ {* P" [8 d
<>  </P>- r8 H8 e* \# b% Z, C+ O+ h- T
<>  在串口初始化完毕后,还要建立与通信有关的事件对象。一般使用 </P>
% F! o) y9 e5 p2 x' W4 Y) v& `<>CreateEvent()函数,它返回一事件句柄,其中参数lpEventAttributes指向安全 </P>
! c0 ~4 K, K7 u+ N( ?- P<>属性结构地址,在Win 95(无安全属性)中为NULL;布尔参数bManualReset 定 </P>9 {2 x( G/ w  b2 ^5 x- g& n
<>义事件重置方式,true 表示手工重置,false表示自动重置(相关函数为 </P>
: a! j  M7 b4 f: `) y5 f5 U/ t, N8 _<P>SetEvent()和ResetEvent());参数bInitialState定义事件初始状态,true表 </P>" k1 R3 r8 d8 W7 Y3 w; T; c
<P>示发信号,否则为不发信号;lpName是为多进程设置的事件名,对于单进程定义 </P>
, a9 `1 |+ Z+ }% c9 H, m<P>为NULL。然后用SetCommMask()定义用户程序可监视的通信事件类别。 </P>
/ g& [  Y. |0 _3 m! o( \<P>  </P>8 W; w+ L9 G' t) \" X5 d1 Z
<P>  以上设置完成后,用户程序就可以等待通信事件的产生,一般调用函数 </P>
- I! Q! C7 ^5 y. `<P>WaitCommEvent()监视通信事件,其中参数lpEvtMask指向产生事件的掩码地址, </P>
' y9 x' Q: N) v' Z6 F6 Y; v4 _<P>用于判断事件产生的性质,lpOverlapped指向重叠结构地址,可简单定义为 </P>
2 G/ f; z4 E. T2 _2 b# _<P>NULL。对于串口事件的响应一般有四种方式:查询、同步I/O、异步I/O和事件驱 </P>! i+ C5 Y, ~) O: ?
<P>动I/O,需要根据用户不同控制要求而定。查询方式占用较长的计算机时间,同 </P>. i. a5 m' r6 a8 _( |6 C- u
<P>步I/O方式直到读取完指定的字节数或超时时才返回,容易造成线程阻塞,异步 </P># o1 _& ?. b. _: z, O
<P>I/O用于后台处理,事件驱动是由系统通知用户程序发生的事件并进行串口操作 </P>
8 x7 K6 }. q1 T3 Q/ P<P>。 比较而言事件驱动I/O方式较灵活。 </P>
5 |; c& b& E$ y% n<P>  </P>
& t% o2 Q/ _. t0 \6 a" U2 o& w/ E<P>  当有通信事件产生时,就可用函数ReadFile()和WriteFile()直接对串口缓 </P># i0 s* }9 \$ x$ O) A9 s
<P>冲区进行读写操作了。其中lpBuffer 指向读写缓冲区,nNumberOfBytes为要读 </P>
1 l- S2 _1 h5 r- X  |<P>写的字节数,lpNumberOfBytes为实际读写的字节数,lpOverlapped指定同步或 </P>
. F& o; d- l7 ^6 W<P>异步操作。通信结束后,调用函数CloseHandle()将串口关闭。 </P>8 w* ^; ]; J, K! }
<P>  </P>
' ]; V/ u; K& `  g' j+ a5 r<P>  ·应用实例说明· </P>
$ _* Q: @, N; A<P>  </P>
( d7 k4 D! @: S# {* R' O2 w<P>  </P>
4 m2 h. }, ^) Q- s( @% J  g& L<P>  使用以上的API函数,笔者给出了简化后的串口初始化的实例。图1为使用C </P>1 k  W9 W' G- k$ W7 q
<P>++ Builder 组件生成的串口通信基本参数设置的界面实例。 </P>- o9 m$ E: T- ]% f
<P>  </P>
* [$ P5 L6 l$ a5 W- ~3 i: F<P>  HANDLE hcom; //定义句柄 </P>
, |' j+ D" Z. F# a0 \<P>  </P>
; U0 j% q$ C6 F1 _<P>  DCB dcb; </P>" Y: I& L2 B  l3 P7 W
<P>  </P>! n6 v- H1 _+ ~. l: O
<P>  OVERLAPPED e; //定义重叠结构 </P>( m) |/ H+ [! p) f* |' a
<P>  </P>
* j3 `% j* t: c: G  p<P>  void —fastcall TForm1::OkBtnClick(TObject?Sender) </P>
: h2 B/ n( m  C0 w<P>  </P>
+ }: ^2 C+ d2 {! {3 L8 E! T<P>  { hcom=CreateFile("COM2",GENERIC—READ|GENERIC—WRITE,0,NULL,OPEN </P>
( S" K; j6 v( T: V$ e) N<P>—EXISTING, </P>5 O4 F! D. ~2 X( F
<P>FILE—ATTRIBUTE—NORMAL|FILE—FLAG—OVERLAPPED,NULL); //打开通讯口 </P>& R( D, F- ?/ ~* S4 k5 K3 m/ r
<P>  </P>" Z3 A5 M7 W. ^, w- a
<P>   BuildCommDCB("9600,O,8,1",&dcb); </P>3 p* Z6 l; `# [: i! M. n% L
<P>  </P>) W2 Z7 ]5 F! A. z: w8 s, J
<P>//第一个字符串参数实际使用时由图1选择后组合,这里仅简单说明其格式 </P>
. y7 H0 T6 o) [" r# {<P>  </P>! Y! r/ w- G3 n# F0 D: O
<P>   SetCommState(hcom,&dcb); </P>
) j: d2 ]/ H4 h" b3 ~& {) v<P>  </P>; R: z1 W' L" K4 u6 ~
<P>   SetupComm(hcom,512,512);//设置读写缓冲区 </P>! k. W% I8 n8 T) _8 P4 g
<P>  </P>9 Z: R" I, R( e' w1 I& L- R, \
<P>   e.hEvent=CreateEvent(NULL,false,false,NULL); //设置事件 </P>
, s: r- O# \) i+ |<P>  </P>
" |2 z* J/ G; {0 N. a) B<P>   SetCommMask(hcom,EV—RXCHAR| EV—TXEMPTY); //设置事件掩码 </P>: W) p) i( I$ r
<P>  </P>6 U# l0 t/ J6 P0 U& j( a5 p
<P>   OkBtn-〉Enabled=false;} </P>
作者: cjplove    时间: 2005-1-31 23:43
<>强啊,顶</P>
作者: cjplove    时间: 2005-1-31 23:43
<>不错呢</P>
作者: lhc_mike    时间: 2005-3-9 09:33
又是转的吧?
作者: xtmlj    时间: 2005-3-12 19:24

作者: ai8815    时间: 2010-8-6 11:07
这个程序看着怎么有点怪呢
作者: ai8815    时间: 2010-8-6 11:08
我用VB编过,好像是比c build简单呢   个人觉得




欢迎光临 数学建模社区-数学中国 (http://www.madio.net/) Powered by Discuz! X2.5