数学建模社区-数学中国

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

作者: 韩冰    时间: 2005-1-26 13:06
标题: 用C++Builder4.0编写Win 95下的串行异步通信程序
<>  </P>
' a& p& U8 V) a1 D<>姜滨 </P>1 q5 z" o5 _4 Y9 R4 f: r
<>  </P>$ i% m- H- i1 {1 z7 e' f2 H; I
<>  ·串口操纵的基本方法· </P>
: k5 j4 o# C5 G  s+ o7 d: Y<>  </P>
) }5 s: o# q+ O2 p3 h  f" t<>  </P>
9 d4 S- y9 Q: E' {) p) j<>  在Win32下,对串口的操作就如同对文件一样打开或关闭,对串行数据的读 </P>, b, G) r2 A* N$ v( k3 t
<>写可在用户定义的读写缓冲区中进行。具体使用的函数为: </P>
( q! |1 D% U3 E' L# k; J<>  </P>! P$ \" |! G# E0 \2 }; K9 o. N3 W
<>  首先用CreateFile( )打开通信串口,其中参数lpFileName指向串口逻辑名 </P>4 F' _2 N6 Z* U6 p; e2 h5 {( }( i' Y
<>,如“COM1”或“COM2”等,参数dwDesiredAccess定义文件的读写权限,一般 </P>
" D& a( {. e" L7 C& I6 y6 ^( C<>设为GENERIC—READ|GENERIC—WRITE;参数dwShareMode定义资源共享方式,此 </P>
* ]4 L9 }" i# o+ a+ I1 t0 e+ x<>处必须设为0,为独占方式;lpSecurityAttributes定义安全属性,Win 95下为 </P>
9 K) q! e8 D) R$ u5 q# v  p- R<>NULL;dwCreationDistribution定义文件创建方式;dwFlagsAndAttributes定义 </P>' z( d) e* d: n
<>文件属性和标记,应设为FILE—FLAG—OVERLAPPED,表示异步通信方式; </P>& n1 h9 U7 Q' o$ o
<>hTemplateFile 指向一个模板文件的句柄,在 Windows 95下为NULL。 </P>
2 ?, B( E$ n, d4 `  B" F  o8 m9 T<>  </P>
, y: m5 B9 Z, _7 g+ [<>  然后用BuildCommDCB( )和SetCommState( )函数通过通信设备控制块DCB( </P>
7 G4 i" z7 S) r' o- V& E<>Device Control Block)设置串口通信参数(如波特率、停止位、数据位、校验 </P>
1 b8 _6 U8 s/ @<>位等),其中BuildCommDCB( )中的字符串参数lpDef 定义同DOS命令中MODE的参 </P>2 ~/ a" s& M' c) \5 X9 f
<>数格式,关于DCB更具体的设置需要根据用户对数据流定义、握手信号及通信控 </P>
4 s; ~! \* i, t9 C<>制要求具体定义,参见有关Windows技术资料。用GetCommState()可以得到当前 </P>
2 r2 o- q6 [' |, S( ~<>的DCB参数值。如果需要还可通过SetCommTimeouts()和GetCommTomeouts()重新 </P>0 X3 W7 g; X* V) y3 W* C
<>设置读写的超时参数;读写缓冲区的设置使用SetupComm(),参数dwInQueue和 </P>
7 K% ^7 y( }3 M% p* e<>dwOutQueue分别定义为输入和输出缓冲区的大小。 </P>' x5 z* p( @! w: [, {9 ~1 \
<>  </P>; d* n# I5 M# L0 T2 r# e6 q$ l* {
<>  在串口初始化完毕后,还要建立与通信有关的事件对象。一般使用 </P>
. C% C# K. J2 n! r<>CreateEvent()函数,它返回一事件句柄,其中参数lpEventAttributes指向安全 </P>
+ }4 b% `+ j) i7 V( O<>属性结构地址,在Win 95(无安全属性)中为NULL;布尔参数bManualReset 定 </P>2 h$ C6 h2 ~. K1 x+ p$ _
<>义事件重置方式,true 表示手工重置,false表示自动重置(相关函数为 </P>% ?+ R! \1 k: F! J3 D
<P>SetEvent()和ResetEvent());参数bInitialState定义事件初始状态,true表 </P>
! j2 F* s" v0 {$ T. O& W) U<P>示发信号,否则为不发信号;lpName是为多进程设置的事件名,对于单进程定义 </P>
; O& Z/ V7 q7 N, {) @- y9 i<P>为NULL。然后用SetCommMask()定义用户程序可监视的通信事件类别。 </P>
! o( \' T5 r8 g) o3 u<P>  </P>
. L0 c* ~: o, s: f$ {<P>  以上设置完成后,用户程序就可以等待通信事件的产生,一般调用函数 </P>
; K5 q3 e) ]7 |0 W1 |<P>WaitCommEvent()监视通信事件,其中参数lpEvtMask指向产生事件的掩码地址, </P>
5 w( K: Q; \: p6 y8 E<P>用于判断事件产生的性质,lpOverlapped指向重叠结构地址,可简单定义为 </P>
* S( J1 T; B9 T4 X1 S' k! V% l" k<P>NULL。对于串口事件的响应一般有四种方式:查询、同步I/O、异步I/O和事件驱 </P>3 v: l$ m. O; S3 B) \$ O/ u6 m
<P>动I/O,需要根据用户不同控制要求而定。查询方式占用较长的计算机时间,同 </P>
' F1 }! M7 l2 r7 f- x  k<P>步I/O方式直到读取完指定的字节数或超时时才返回,容易造成线程阻塞,异步 </P>! J7 D9 C& V9 l
<P>I/O用于后台处理,事件驱动是由系统通知用户程序发生的事件并进行串口操作 </P>
: J; V% G+ S; W  T' K<P>。 比较而言事件驱动I/O方式较灵活。 </P>: E, h1 R5 f3 F4 X, S% i! `
<P>  </P>$ j, ^. y6 \! i; v* P3 H- D
<P>  当有通信事件产生时,就可用函数ReadFile()和WriteFile()直接对串口缓 </P>& Q# Z. O- h/ o! l9 q! `
<P>冲区进行读写操作了。其中lpBuffer 指向读写缓冲区,nNumberOfBytes为要读 </P>6 R0 s' f; y$ |+ `# P3 j. [* R
<P>写的字节数,lpNumberOfBytes为实际读写的字节数,lpOverlapped指定同步或 </P>
; t4 w$ N2 p0 {4 o<P>异步操作。通信结束后,调用函数CloseHandle()将串口关闭。 </P>. J$ O0 f6 A* u. f4 n! ^: X
<P>  </P>8 b  V' }. G& B) M' a+ }6 G$ T2 v
<P>  ·应用实例说明· </P>4 S$ M% q, x' L' R
<P>  </P>
, ?6 Y  i) m  {- i" @<P>  </P>" G9 B4 ^' R9 y
<P>  使用以上的API函数,笔者给出了简化后的串口初始化的实例。图1为使用C </P>/ B4 B. m& G2 `' n9 V4 e, }
<P>++ Builder 组件生成的串口通信基本参数设置的界面实例。 </P>
1 E5 _$ ]4 b6 q% H<P>  </P>
0 j  V+ }, [" G$ R<P>  HANDLE hcom; //定义句柄 </P>
3 z( |' b% P2 t: t<P>  </P>  X8 {1 ~, ^% V/ n9 k3 c
<P>  DCB dcb; </P>! I. x. p- N9 X, h6 a
<P>  </P>
: u) {2 N; k$ J0 h<P>  OVERLAPPED e; //定义重叠结构 </P>
. Z% H3 f/ @* Z7 ^$ E4 P1 O<P>  </P>
; O4 j# O7 p4 G<P>  void —fastcall TForm1::OkBtnClick(TObject?Sender) </P>
5 O' q% R' H& Y) |5 f1 @* l<P>  </P>! Q, l2 Y. ?  b7 h/ U" V! m
<P>  { hcom=CreateFile("COM2",GENERIC—READ|GENERIC—WRITE,0,NULL,OPEN </P>$ l' I! M+ d& S5 J& P: g- N6 p
<P>—EXISTING, </P>
- f8 R3 k8 ]3 r  z2 S' D<P>FILE—ATTRIBUTE—NORMAL|FILE—FLAG—OVERLAPPED,NULL); //打开通讯口 </P>
# v4 j& }3 v# m1 }<P>  </P>. w. R& Y* p' p5 p
<P>   BuildCommDCB("9600,O,8,1",&dcb); </P>
* j+ S- V7 {9 s! N% v<P>  </P>
* R! X: S$ U% v0 X9 c' |" W<P>//第一个字符串参数实际使用时由图1选择后组合,这里仅简单说明其格式 </P>7 G5 P/ b) N% _5 I2 e) ~& E
<P>  </P>
' ~, |. `( [3 Y1 d* N' R! M<P>   SetCommState(hcom,&dcb); </P>
4 C3 Z5 A2 {5 z<P>  </P>
7 O6 k6 \4 U; W* N: x- N/ }<P>   SetupComm(hcom,512,512);//设置读写缓冲区 </P>2 r1 O: e7 y3 i/ [$ U
<P>  </P>9 B! f9 ?) L9 y$ w# \$ q
<P>   e.hEvent=CreateEvent(NULL,false,false,NULL); //设置事件 </P>
! B( @' A! [" a2 \' ]6 A<P>  </P>
9 L3 Y) ?. h4 T  @. B8 V+ w<P>   SetCommMask(hcom,EV—RXCHAR| EV—TXEMPTY); //设置事件掩码 </P>
/ q4 ?- B; E1 M: z* N: j<P>  </P>
- v1 x/ Q1 J' b<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