QQ登录

只需要一步,快速开始

 注册地址  找回密码
查看: 11068|回复: 6
打印 上一主题 下一主题

用C++Builder4.0编写Win 95下的串行异步通信程序

[复制链接]
字体大小: 正常 放大
韩冰        

823

主题

3

听众

4048

积分

我的地盘我做主

该用户从未签到

发帖功臣 元老勋章

跳转到指定楼层
1#
发表于 2005-1-26 13:06 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
<>  </P>
: ^2 |# ~" v. o3 s9 F; V0 s<>姜滨 </P>
+ ]8 z" m4 _! F4 P7 z<>  </P>
4 i( X, s) [$ {/ k7 }6 Z- E<>  ·串口操纵的基本方法· </P>
1 q; k) i) `; i9 q9 p" @# o<>  </P>
6 z/ q( R- k, k1 h6 N5 l% _<>  </P>, G/ m" V, i) B. ?; G! C8 d
<>  在Win32下,对串口的操作就如同对文件一样打开或关闭,对串行数据的读 </P>! ~/ W6 H# _0 ~0 a. A# X( T  R
<>写可在用户定义的读写缓冲区中进行。具体使用的函数为: </P>
( {2 J: {: K2 H# y6 T% @1 r* G) \<>  </P>2 Q, ]6 x1 U% C; d$ J4 ]
<>  首先用CreateFile( )打开通信串口,其中参数lpFileName指向串口逻辑名 </P>
# E+ J6 ?* k' ~* @( `4 `) B0 [, m<>,如“COM1”或“COM2”等,参数dwDesiredAccess定义文件的读写权限,一般 </P>
4 s4 k! l4 K* l( f<>设为GENERIC—READ|GENERIC—WRITE;参数dwShareMode定义资源共享方式,此 </P>
2 }5 I5 z5 }+ S7 S. R/ D' ?" j<>处必须设为0,为独占方式;lpSecurityAttributes定义安全属性,Win 95下为 </P>
3 y, G& A- ~  {( z5 q( \<>NULL;dwCreationDistribution定义文件创建方式;dwFlagsAndAttributes定义 </P>
! l- O2 T- A. Y6 {* p5 I. u7 Q' y4 ?<>文件属性和标记,应设为FILE—FLAG—OVERLAPPED,表示异步通信方式; </P>$ s1 H9 n6 Q) I3 p
<>hTemplateFile 指向一个模板文件的句柄,在 Windows 95下为NULL。 </P>7 S7 L- L- u$ C: c: p- j
<>  </P>5 P+ {! o3 n$ [4 [# p
<>  然后用BuildCommDCB( )和SetCommState( )函数通过通信设备控制块DCB( </P>
2 V" l4 K1 T. N$ a<>Device Control Block)设置串口通信参数(如波特率、停止位、数据位、校验 </P>
3 b1 @# Z" n/ k* k& G( z<>位等),其中BuildCommDCB( )中的字符串参数lpDef 定义同DOS命令中MODE的参 </P>1 z* S' W/ u* b
<>数格式,关于DCB更具体的设置需要根据用户对数据流定义、握手信号及通信控 </P>
( c" j9 j3 b; w- |<>制要求具体定义,参见有关Windows技术资料。用GetCommState()可以得到当前 </P>: l4 s% f, s9 Z3 [  ~
<>的DCB参数值。如果需要还可通过SetCommTimeouts()和GetCommTomeouts()重新 </P>
$ m3 A, N; a! s  h: k) s<>设置读写的超时参数;读写缓冲区的设置使用SetupComm(),参数dwInQueue和 </P>
! @0 N4 {5 Y4 Z; |  K<>dwOutQueue分别定义为输入和输出缓冲区的大小。 </P>0 Q. Y: E! Z3 {1 ]( o, |
<>  </P>: U2 M% ?5 ]" m. Q8 M; J0 ?
<>  在串口初始化完毕后,还要建立与通信有关的事件对象。一般使用 </P>
$ R7 l3 P  g! Q/ k<>CreateEvent()函数,它返回一事件句柄,其中参数lpEventAttributes指向安全 </P>
3 ^* J+ C0 @0 O5 ]4 r8 }<>属性结构地址,在Win 95(无安全属性)中为NULL;布尔参数bManualReset 定 </P>
) N& H. J7 T. G: n8 D9 k<>义事件重置方式,true 表示手工重置,false表示自动重置(相关函数为 </P>3 ~* f4 o3 W$ l6 n! W2 Y
<P>SetEvent()和ResetEvent());参数bInitialState定义事件初始状态,true表 </P>+ |! v+ H) `, ~7 p
<P>示发信号,否则为不发信号;lpName是为多进程设置的事件名,对于单进程定义 </P>
5 D0 z/ }$ A! J, q9 n<P>为NULL。然后用SetCommMask()定义用户程序可监视的通信事件类别。 </P>
" p4 f$ U0 x- [9 W2 Q) c<P>  </P>
) l- z% b1 p" _) k7 ~<P>  以上设置完成后,用户程序就可以等待通信事件的产生,一般调用函数 </P>
/ E$ `1 X6 I, b; N$ x: `<P>WaitCommEvent()监视通信事件,其中参数lpEvtMask指向产生事件的掩码地址, </P>2 Z3 Q' d9 ?: R: I" h$ r. O  s6 J: U
<P>用于判断事件产生的性质,lpOverlapped指向重叠结构地址,可简单定义为 </P>
: d- q) W/ E* b* l/ y2 s. t<P>NULL。对于串口事件的响应一般有四种方式:查询、同步I/O、异步I/O和事件驱 </P>: V5 T  G% x3 @9 w
<P>动I/O,需要根据用户不同控制要求而定。查询方式占用较长的计算机时间,同 </P>
7 V6 A5 {& q  J% a0 |1 J$ D<P>步I/O方式直到读取完指定的字节数或超时时才返回,容易造成线程阻塞,异步 </P>! q" z# {5 ]1 J9 t) ?
<P>I/O用于后台处理,事件驱动是由系统通知用户程序发生的事件并进行串口操作 </P>
, O. g5 m( M: |# x) E  o' r<P>。 比较而言事件驱动I/O方式较灵活。 </P>. M# U. {, C% J! W# e
<P>  </P>
/ z: }6 I) M! r1 r5 Q7 l' J<P>  当有通信事件产生时,就可用函数ReadFile()和WriteFile()直接对串口缓 </P>
: _% z3 D. B1 ?& D1 t<P>冲区进行读写操作了。其中lpBuffer 指向读写缓冲区,nNumberOfBytes为要读 </P>
& c. g: _+ e% Z" q% h$ P<P>写的字节数,lpNumberOfBytes为实际读写的字节数,lpOverlapped指定同步或 </P>3 v9 p0 {; F: K# Z$ J3 A" E
<P>异步操作。通信结束后,调用函数CloseHandle()将串口关闭。 </P>) |* @. u+ r. G) [: O7 `
<P>  </P>
9 C( e0 Q- \; w# j: o" ~2 X! z% [( \<P>  ·应用实例说明· </P>
+ O% g& T, G& R( G<P>  </P>
1 o) q8 [" \6 w4 w# T9 V3 x# P<P>  </P>0 |5 k4 }/ Y* X9 v1 w' o
<P>  使用以上的API函数,笔者给出了简化后的串口初始化的实例。图1为使用C </P>3 v' e) H* b# u
<P>++ Builder 组件生成的串口通信基本参数设置的界面实例。 </P>
8 N0 m0 s* ~$ x. Y7 I<P>  </P>/ S  g9 r$ I0 [: n; v. v9 _! u
<P>  HANDLE hcom; //定义句柄 </P>
. w" X1 E- k' M9 P' K: @; h<P>  </P>( ^- n* o0 A( |) B( _/ {
<P>  DCB dcb; </P>
1 s6 M( m3 L' }9 H<P>  </P>  b+ J1 B9 D; f$ C7 {0 D
<P>  OVERLAPPED e; //定义重叠结构 </P>
: @+ |. Y& z  K9 p3 G' |<P>  </P>! N0 d/ L0 Y% {4 q; [/ |0 I
<P>  void —fastcall TForm1::OkBtnClick(TObject?Sender) </P>
) t- T* Y2 B( l<P>  </P>
" ?' j# P3 ^9 R* n* Q, s# L% [# {<P>  { hcom=CreateFile("COM2",GENERIC—READ|GENERIC—WRITE,0,NULL,OPEN </P>
0 z+ _  W$ i4 }<P>—EXISTING, </P>
! m: D4 Y0 l" B, z# \<P>FILE—ATTRIBUTE—NORMAL|FILE—FLAG—OVERLAPPED,NULL); //打开通讯口 </P>- y9 l; v! F. v! _" o* H
<P>  </P>
7 Z7 ?/ I: k# T+ h6 s$ i<P>   BuildCommDCB("9600,O,8,1",&dcb); </P>
2 f, Y2 c, K0 t<P>  </P>+ K/ T& W/ O( H& _
<P>//第一个字符串参数实际使用时由图1选择后组合,这里仅简单说明其格式 </P>+ L( Z$ ?$ A# d/ }& ]( Y
<P>  </P>
! \4 x2 j" c& w& D<P>   SetCommState(hcom,&dcb); </P>
# N1 _- s* V& Q* X<P>  </P>
5 j( P. c) V& ^. X' @- ~5 C<P>   SetupComm(hcom,512,512);//设置读写缓冲区 </P>
3 Q& U5 k  @& v0 K6 Y4 [7 B: ^<P>  </P>" l/ e4 f8 }; `, C- y" P9 R
<P>   e.hEvent=CreateEvent(NULL,false,false,NULL); //设置事件 </P>  E3 ~9 S4 `$ T# j/ d
<P>  </P>2 x& l5 `) a. @% Z# j7 z, Q
<P>   SetCommMask(hcom,EV—RXCHAR| EV—TXEMPTY); //设置事件掩码 </P>& L. J, }5 O6 Q/ U
<P>  </P>
1 ~4 x# x6 }9 Q6 ~9 j9 z# |<P>   OkBtn-〉Enabled=false;} </P>
zan
转播转播0 分享淘帖0 分享分享0 收藏收藏0 支持支持0 反对反对0 微信微信
cjplove        

0

主题

0

听众

50

积分

升级  47.37%

该用户从未签到

新人进步奖

回复

使用道具 举报

cjplove        

0

主题

0

听众

50

积分

升级  47.37%

该用户从未签到

新人进步奖

回复

使用道具 举报

lhc_mike        

0

主题

2

听众

52

积分

升级  49.47%

该用户从未签到

新人进步奖

回复

使用道具 举报

xtmlj        

0

主题

2

听众

95

积分

升级  94.74%

该用户从未签到

新人进步奖

回复

使用道具 举报

ai8815 实名认证       

0

主题

3

听众

26

积分

升级  22.11%

该用户从未签到

自我介绍
呵呵 大家多多交流呀!!
回复

使用道具 举报

ai8815 实名认证       

0

主题

3

听众

26

积分

升级  22.11%

该用户从未签到

自我介绍
呵呵 大家多多交流呀!!
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册地址

qq
收缩
  • 电话咨询

  • 04714969085
fastpost

关于我们| 联系我们| 诚征英才| 对外合作| 产品服务| QQ

手机版|Archiver| |繁體中文 手机客户端  

蒙公网安备 15010502000194号

Powered by Discuz! X2.5   © 2001-2013 数学建模网-数学中国 ( 蒙ICP备14002410号-3 蒙BBS备-0002号 )     论坛法律顾问:王兆丰

GMT+8, 2026-9-1 19:04 , Processed in 0.735360 second(s), 86 queries .

回顶部