QQ登录

只需要一步,快速开始

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

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

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

823

主题

3

听众

4048

积分

我的地盘我做主

该用户从未签到

发帖功臣 元老勋章

跳转到指定楼层
1#
发表于 2005-1-26 13:06 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
<>  </P>
3 h0 |6 N- V& l! G" g1 w3 {<>姜滨 </P>
8 D" K) {$ [# `8 _<>  </P>2 z# r- l% E  x# }7 o
<>  ·串口操纵的基本方法· </P>
' ^* m% H6 Q, Q3 {) k" f) A9 `) c<>  </P>
* c! U  U/ f: }! C  A! K6 Q<>  </P>
0 s- A2 l9 y) m. `<>  在Win32下,对串口的操作就如同对文件一样打开或关闭,对串行数据的读 </P>  v! ?% c0 o/ y- O0 ~
<>写可在用户定义的读写缓冲区中进行。具体使用的函数为: </P>; g1 ~$ S$ }0 x) ~+ d: A) h( g' a5 c
<>  </P>0 E9 F- N/ p8 ?) j9 x
<>  首先用CreateFile( )打开通信串口,其中参数lpFileName指向串口逻辑名 </P>
. Q1 Y: c4 `7 ?. }  J: T- ^7 `6 n<>,如“COM1”或“COM2”等,参数dwDesiredAccess定义文件的读写权限,一般 </P>
  L5 w/ j, x! [" {<>设为GENERIC—READ|GENERIC—WRITE;参数dwShareMode定义资源共享方式,此 </P>
! e+ o6 V- r9 _. O/ C<>处必须设为0,为独占方式;lpSecurityAttributes定义安全属性,Win 95下为 </P>" M- o# W2 O' G& H; B: r6 V
<>NULL;dwCreationDistribution定义文件创建方式;dwFlagsAndAttributes定义 </P>
, L- @' c5 h2 G1 v) J* T<>文件属性和标记,应设为FILE—FLAG—OVERLAPPED,表示异步通信方式; </P>' ]2 ^4 i, Q' @2 K1 ?
<>hTemplateFile 指向一个模板文件的句柄,在 Windows 95下为NULL。 </P>7 p4 C" Y5 X8 h' \3 e  l0 `9 }
<>  </P>
8 U/ C* r0 u; x/ o+ ]/ v<>  然后用BuildCommDCB( )和SetCommState( )函数通过通信设备控制块DCB( </P>
. I" z  E: }# W) g<>Device Control Block)设置串口通信参数(如波特率、停止位、数据位、校验 </P>
7 k+ |& z4 b- I+ }) x- M% M. M) W<>位等),其中BuildCommDCB( )中的字符串参数lpDef 定义同DOS命令中MODE的参 </P>
: W7 ?2 k4 X' ~2 x5 U<>数格式,关于DCB更具体的设置需要根据用户对数据流定义、握手信号及通信控 </P>
+ i$ f* u& D+ T$ a8 e<>制要求具体定义,参见有关Windows技术资料。用GetCommState()可以得到当前 </P>
' O7 H4 e: `. o' c5 q" Y! L<>的DCB参数值。如果需要还可通过SetCommTimeouts()和GetCommTomeouts()重新 </P>$ r" q& M7 }# @+ h+ K/ \/ n
<>设置读写的超时参数;读写缓冲区的设置使用SetupComm(),参数dwInQueue和 </P>
% O& T- U* t, k; X2 W8 u8 x<>dwOutQueue分别定义为输入和输出缓冲区的大小。 </P>
2 }- y1 K( n! m' {<>  </P>
- k. Q) K- U0 m6 j<>  在串口初始化完毕后,还要建立与通信有关的事件对象。一般使用 </P>
) ?4 S0 i" l6 f, O<>CreateEvent()函数,它返回一事件句柄,其中参数lpEventAttributes指向安全 </P>( H  S" c* X' I' X; q8 n
<>属性结构地址,在Win 95(无安全属性)中为NULL;布尔参数bManualReset 定 </P>
, w* c7 }4 R$ g; G<>义事件重置方式,true 表示手工重置,false表示自动重置(相关函数为 </P>2 P, f( Y3 M, F1 }
<P>SetEvent()和ResetEvent());参数bInitialState定义事件初始状态,true表 </P>
; I7 U5 \# W9 i, j5 G5 r# w9 L( J/ u<P>示发信号,否则为不发信号;lpName是为多进程设置的事件名,对于单进程定义 </P>- U7 a4 R9 s* `3 y# l
<P>为NULL。然后用SetCommMask()定义用户程序可监视的通信事件类别。 </P>
# E$ T2 q, O6 Y- p0 O% S<P>  </P>
" k& ~0 E. d. j7 e<P>  以上设置完成后,用户程序就可以等待通信事件的产生,一般调用函数 </P>
! r4 ]0 y/ u( j! n& Z<P>WaitCommEvent()监视通信事件,其中参数lpEvtMask指向产生事件的掩码地址, </P>+ ~5 f9 B4 p" z5 _1 `
<P>用于判断事件产生的性质,lpOverlapped指向重叠结构地址,可简单定义为 </P>( L: m: N' h% T( B! w; k
<P>NULL。对于串口事件的响应一般有四种方式:查询、同步I/O、异步I/O和事件驱 </P>1 [- }& Y0 ^( G9 M$ u$ `
<P>动I/O,需要根据用户不同控制要求而定。查询方式占用较长的计算机时间,同 </P>
8 w2 N0 K3 H* }1 j# a9 `$ n3 V/ d( p<P>步I/O方式直到读取完指定的字节数或超时时才返回,容易造成线程阻塞,异步 </P>  v: J' E0 s" r
<P>I/O用于后台处理,事件驱动是由系统通知用户程序发生的事件并进行串口操作 </P>1 u5 B) N4 V& t! A/ z1 s
<P>。 比较而言事件驱动I/O方式较灵活。 </P>+ R. R$ z. U4 g0 C( V9 `# c
<P>  </P>
7 ~  G: q2 B& T<P>  当有通信事件产生时,就可用函数ReadFile()和WriteFile()直接对串口缓 </P>9 w: r/ v0 e" Y/ s/ o1 X! q
<P>冲区进行读写操作了。其中lpBuffer 指向读写缓冲区,nNumberOfBytes为要读 </P>
. ^3 C0 J# D/ l<P>写的字节数,lpNumberOfBytes为实际读写的字节数,lpOverlapped指定同步或 </P>5 J4 T& S, J$ ^9 Z( A9 l# X
<P>异步操作。通信结束后,调用函数CloseHandle()将串口关闭。 </P>
5 |: h- x, f" y+ s; b% G& j<P>  </P>, x  f- z  Q- [$ M4 @% W+ z4 G
<P>  ·应用实例说明· </P>
9 F* r) m: {3 ^! ~' D* I1 j3 I2 u<P>  </P>
1 N+ L. x. u0 s6 U( r$ z' B. f<P>  </P>1 Z0 O; }" }# F6 R9 P! d6 M( ^
<P>  使用以上的API函数,笔者给出了简化后的串口初始化的实例。图1为使用C </P>
1 A8 [$ j# ~% E7 N% E7 I  H<P>++ Builder 组件生成的串口通信基本参数设置的界面实例。 </P>
6 |  L1 q8 o; K8 |. I<P>  </P>& P8 h+ k* B' ?6 K1 I0 G5 J& G
<P>  HANDLE hcom; //定义句柄 </P>
- ~1 E; z* ~. m+ j- }9 B; u<P>  </P>
' I. T$ [# u6 J- x- \( I; s<P>  DCB dcb; </P>( w, i& G2 R; ^' i' a8 j
<P>  </P>
4 j9 F9 h4 X( t6 L<P>  OVERLAPPED e; //定义重叠结构 </P>  `: i7 S/ g" O8 F' j1 C
<P>  </P>6 ]. T3 R/ w1 `6 e! C
<P>  void —fastcall TForm1::OkBtnClick(TObject?Sender) </P>% d& z+ `9 a# {4 E
<P>  </P>7 l0 N% B- ]/ f4 r# p2 l
<P>  { hcom=CreateFile("COM2",GENERIC—READ|GENERIC—WRITE,0,NULL,OPEN </P>
- ]7 J! L& ]  V9 F$ ]<P>—EXISTING, </P>% U: _- D  x) g) z4 {: {8 C+ p8 W- D
<P>FILE—ATTRIBUTE—NORMAL|FILE—FLAG—OVERLAPPED,NULL); //打开通讯口 </P>8 o+ D- X8 O2 H  @! v; b( |
<P>  </P>
( A- M, Y& m/ ?0 Q) o<P>   BuildCommDCB("9600,O,8,1",&dcb); </P>+ G/ {6 r4 @) I: y
<P>  </P>  p+ M, C  q: t9 |/ M6 d( {
<P>//第一个字符串参数实际使用时由图1选择后组合,这里仅简单说明其格式 </P>
7 b3 ?2 d' W& l: `7 v6 S<P>  </P>
' z0 L1 i+ ~$ c<P>   SetCommState(hcom,&dcb); </P>
  B; l3 W  ~0 T! M% R<P>  </P>* u4 Q' \6 r) b
<P>   SetupComm(hcom,512,512);//设置读写缓冲区 </P>
5 q' ~5 @. M" _- m: H% Z8 \% c+ B2 _<P>  </P>' c* k' ~: X$ I4 a2 p# P# j9 n/ c
<P>   e.hEvent=CreateEvent(NULL,false,false,NULL); //设置事件 </P>
- J) d9 }% }) q$ L<P>  </P>
2 j6 c) ~# K( t$ b" B8 z5 k<P>   SetCommMask(hcom,EV—RXCHAR| EV—TXEMPTY); //设置事件掩码 </P>, R8 Y9 E$ u0 {2 Y# v: U
<P>  </P>
3 |. q: r% S4 K7 l8 g6 e( f) V8 u0 J- T<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-4-20 03:16 , Processed in 0.504424 second(s), 85 queries .

回顶部