数学建模社区-数学中国

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

作者: 韩冰    时间: 2005-1-26 13:06
标题: 用C++Builder4.0编写Win 95下的串行异步通信程序
<>  </P>5 x1 c' \# x- J9 g& }! H2 k
<>姜滨 </P># W, {4 Q* m- U! m* q" W( }
<>  </P>" u6 `" M. v9 c/ g6 Y3 n& S
<>  ·串口操纵的基本方法· </P>2 N% u! z% ?) N9 R0 f4 S2 Z, l
<>  </P>6 D* N8 Y6 B+ ^
<>  </P>
2 U% |/ R+ j/ t+ R, Y<>  在Win32下,对串口的操作就如同对文件一样打开或关闭,对串行数据的读 </P>
' ^4 f; F0 m% z<>写可在用户定义的读写缓冲区中进行。具体使用的函数为: </P>2 g/ g3 b7 M6 L9 h1 r" G+ C+ L
<>  </P>8 ]- m8 T' D8 L
<>  首先用CreateFile( )打开通信串口,其中参数lpFileName指向串口逻辑名 </P>
1 L: T0 i, J3 z* y- ?+ @<>,如“COM1”或“COM2”等,参数dwDesiredAccess定义文件的读写权限,一般 </P>
0 Y/ r* i  c: e4 ^1 V" _, ]<>设为GENERIC—READ|GENERIC—WRITE;参数dwShareMode定义资源共享方式,此 </P>' s- u( C* V0 E, \
<>处必须设为0,为独占方式;lpSecurityAttributes定义安全属性,Win 95下为 </P># D' t7 Y! `# ^4 T' {1 Y5 P# \9 `
<>NULL;dwCreationDistribution定义文件创建方式;dwFlagsAndAttributes定义 </P>. O  o$ [; i! y) Q* ?3 [' R
<>文件属性和标记,应设为FILE—FLAG—OVERLAPPED,表示异步通信方式; </P>
+ |3 L( L$ x; S<>hTemplateFile 指向一个模板文件的句柄,在 Windows 95下为NULL。 </P>
2 Z; N" q* Q- o) p<>  </P>7 j" F7 U. E$ C" k) O: E0 y( V
<>  然后用BuildCommDCB( )和SetCommState( )函数通过通信设备控制块DCB( </P>3 p+ p, B; ?9 I6 R% ]
<>Device Control Block)设置串口通信参数(如波特率、停止位、数据位、校验 </P>0 `6 N0 ^3 _4 N
<>位等),其中BuildCommDCB( )中的字符串参数lpDef 定义同DOS命令中MODE的参 </P>
6 ^. ~: S8 ^2 l$ Q3 v1 E& f<>数格式,关于DCB更具体的设置需要根据用户对数据流定义、握手信号及通信控 </P>8 q: R+ K! I/ M, W/ h  [
<>制要求具体定义,参见有关Windows技术资料。用GetCommState()可以得到当前 </P>
& Z( k3 ^1 x$ ]% K" J, z, \<>的DCB参数值。如果需要还可通过SetCommTimeouts()和GetCommTomeouts()重新 </P>
' I5 Q2 I) o7 e1 S% I2 \) h<>设置读写的超时参数;读写缓冲区的设置使用SetupComm(),参数dwInQueue和 </P>7 |2 Q' O# q& T) H* f8 k
<>dwOutQueue分别定义为输入和输出缓冲区的大小。 </P>
0 |3 w) V: b) Z! W5 X6 U: ~) u" O<>  </P>
7 Z/ l7 C% s: c+ {9 ~<>  在串口初始化完毕后,还要建立与通信有关的事件对象。一般使用 </P>
" F/ Y5 z; `& G7 K5 ]6 }- `8 `<>CreateEvent()函数,它返回一事件句柄,其中参数lpEventAttributes指向安全 </P>
- d# x/ }$ `' Q' d; \5 B4 Z<>属性结构地址,在Win 95(无安全属性)中为NULL;布尔参数bManualReset 定 </P>) _# t( {$ J- q1 ?
<>义事件重置方式,true 表示手工重置,false表示自动重置(相关函数为 </P>
& k" [9 `1 P. S5 `0 S9 X3 E<P>SetEvent()和ResetEvent());参数bInitialState定义事件初始状态,true表 </P>
2 _+ F- m, _" G<P>示发信号,否则为不发信号;lpName是为多进程设置的事件名,对于单进程定义 </P>
, D7 @% O, ^8 y* d$ Y<P>为NULL。然后用SetCommMask()定义用户程序可监视的通信事件类别。 </P>: ^( w% u, O4 k" v6 t
<P>  </P>5 \% k  U; m5 n; i
<P>  以上设置完成后,用户程序就可以等待通信事件的产生,一般调用函数 </P>
3 w4 ]; M& U1 M; |8 }<P>WaitCommEvent()监视通信事件,其中参数lpEvtMask指向产生事件的掩码地址, </P>- a0 k0 c7 k' ]
<P>用于判断事件产生的性质,lpOverlapped指向重叠结构地址,可简单定义为 </P>
  T5 s/ s, j& t1 m# A1 q<P>NULL。对于串口事件的响应一般有四种方式:查询、同步I/O、异步I/O和事件驱 </P>- A9 u. A& k3 E* H6 _( U+ O
<P>动I/O,需要根据用户不同控制要求而定。查询方式占用较长的计算机时间,同 </P>4 p6 v; L1 U7 s
<P>步I/O方式直到读取完指定的字节数或超时时才返回,容易造成线程阻塞,异步 </P>8 F1 _5 p) p: u
<P>I/O用于后台处理,事件驱动是由系统通知用户程序发生的事件并进行串口操作 </P>6 Y9 V$ g4 s; M8 U
<P>。 比较而言事件驱动I/O方式较灵活。 </P>
  c  H1 t' w7 z<P>  </P>- ~: v& f+ P6 u7 ]( D& v- c
<P>  当有通信事件产生时,就可用函数ReadFile()和WriteFile()直接对串口缓 </P>! D0 E2 G1 b/ G" o
<P>冲区进行读写操作了。其中lpBuffer 指向读写缓冲区,nNumberOfBytes为要读 </P>$ @/ i- V3 p/ h3 F6 Z  b" @
<P>写的字节数,lpNumberOfBytes为实际读写的字节数,lpOverlapped指定同步或 </P>
9 j9 P1 }( ~* ^! V; W<P>异步操作。通信结束后,调用函数CloseHandle()将串口关闭。 </P>1 ]6 r6 p* g; _- z7 ^
<P>  </P>( b' u5 j1 w1 `( ?$ K
<P>  ·应用实例说明· </P>
9 i1 R. o8 I* q: U<P>  </P>
* f$ Z4 E" J; q7 M5 D5 {<P>  </P>+ Y6 y" o- i: j6 W
<P>  使用以上的API函数,笔者给出了简化后的串口初始化的实例。图1为使用C </P># `/ G) _5 W( q2 o9 U6 o) j( s6 J$ m
<P>++ Builder 组件生成的串口通信基本参数设置的界面实例。 </P>
- B4 N/ n% W1 J- X& b% [0 y# v  @<P>  </P>
: C- Z- B1 U$ }: V- x+ z/ ^<P>  HANDLE hcom; //定义句柄 </P>  h9 H5 B9 t, K& [
<P>  </P>: Y7 ]" p' `) A8 T+ f3 t7 |. g
<P>  DCB dcb; </P>( a, T; B0 w$ a5 G$ h1 T
<P>  </P>
$ Q( K. b  l3 _6 T- Q<P>  OVERLAPPED e; //定义重叠结构 </P>
6 s( A$ D- q  c1 T5 p. c<P>  </P>
0 D* T) v; L! A+ X7 R# j<P>  void —fastcall TForm1::OkBtnClick(TObject?Sender) </P>
: D% R, y7 W( q) s<P>  </P>
+ d) a4 s* z) t* y6 }1 |4 |/ n<P>  { hcom=CreateFile("COM2",GENERIC—READ|GENERIC—WRITE,0,NULL,OPEN </P>4 Y* \. m! U* K8 N- W2 V) w& O3 S/ r
<P>—EXISTING, </P>
* o4 W. p2 O5 v. W5 t) `<P>FILE—ATTRIBUTE—NORMAL|FILE—FLAG—OVERLAPPED,NULL); //打开通讯口 </P>
+ ^! x1 c6 H$ N# x# j% I  p<P>  </P>
% p+ U% m: A; E# `5 ^# P! O& m. w<P>   BuildCommDCB("9600,O,8,1",&dcb); </P>
! [& U: Z0 U% N, ^1 [<P>  </P>* ?$ ?+ s: ?; f# X  `+ [
<P>//第一个字符串参数实际使用时由图1选择后组合,这里仅简单说明其格式 </P>
9 U, K5 l. m: ^6 l<P>  </P>
. r+ h/ n3 V- K, N& V2 N<P>   SetCommState(hcom,&dcb); </P>
) Z, {& b) w$ J) G3 e$ l& A<P>  </P>" a$ Y$ {4 J0 D, S0 E5 P% ^$ I# w) f, m
<P>   SetupComm(hcom,512,512);//设置读写缓冲区 </P>
9 [6 C3 t. _/ w2 O( F<P>  </P>
- B0 b6 U% W8 z8 p" H, R4 w, ?; A<P>   e.hEvent=CreateEvent(NULL,false,false,NULL); //设置事件 </P>7 |  [/ T3 u% y9 _5 e3 r
<P>  </P>4 ^' j* U( `9 ]/ |1 F7 m
<P>   SetCommMask(hcom,EV—RXCHAR| EV—TXEMPTY); //设置事件掩码 </P>
% H8 @" \" X: K* p" l<P>  </P>
9 C" X# V& ~9 z8 U<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