QQ登录

只需要一步,快速开始

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

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

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

823

主题

3

听众

4048

积分

我的地盘我做主

该用户从未签到

发帖功臣 元老勋章

跳转到指定楼层
1#
发表于 2005-1-26 13:06 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
<>  </P>
& t; i2 W" T+ O3 P1 V. e3 m<>姜滨 </P>7 j6 T9 t# a1 @* T' z! D+ l: h6 [
<>  </P>9 f1 r6 k# d( G7 ^
<>  ·串口操纵的基本方法· </P>
4 d% S# i4 [) X4 ]<>  </P>
: {" R! j# w/ G5 J# o<>  </P>3 T" w% U/ I$ L: y! G- o
<>  在Win32下,对串口的操作就如同对文件一样打开或关闭,对串行数据的读 </P>$ l8 `& e( [, K! f7 [% e& t  y0 E
<>写可在用户定义的读写缓冲区中进行。具体使用的函数为: </P>
; }; D& W% y! }+ [4 _" ^9 s/ R<>  </P>
/ E, y" _1 k. t! P0 x3 X  Z<>  首先用CreateFile( )打开通信串口,其中参数lpFileName指向串口逻辑名 </P>0 w4 Z* r* P+ [
<>,如“COM1”或“COM2”等,参数dwDesiredAccess定义文件的读写权限,一般 </P>
$ N3 W( x/ ~  }1 O<>设为GENERIC—READ|GENERIC—WRITE;参数dwShareMode定义资源共享方式,此 </P>
  `: q. p5 O7 |( g1 ]& p<>处必须设为0,为独占方式;lpSecurityAttributes定义安全属性,Win 95下为 </P>& u$ N$ X1 C* K- f3 q9 o5 c
<>NULL;dwCreationDistribution定义文件创建方式;dwFlagsAndAttributes定义 </P># ]3 v; `# R" `$ o! w: `/ K, d: B7 _7 C
<>文件属性和标记,应设为FILE—FLAG—OVERLAPPED,表示异步通信方式; </P>2 G6 q& I  [; W
<>hTemplateFile 指向一个模板文件的句柄,在 Windows 95下为NULL。 </P>
* O, y' l) g' q- x% a+ e, X<>  </P>
; c& W7 W. @# Z$ h" u9 l' v<>  然后用BuildCommDCB( )和SetCommState( )函数通过通信设备控制块DCB( </P>* x9 q; |- {8 R
<>Device Control Block)设置串口通信参数(如波特率、停止位、数据位、校验 </P>
) I( D8 I$ Z! Z9 n( r<>位等),其中BuildCommDCB( )中的字符串参数lpDef 定义同DOS命令中MODE的参 </P>  \, C1 m8 S+ X% c) j
<>数格式,关于DCB更具体的设置需要根据用户对数据流定义、握手信号及通信控 </P>
* H3 E( X# i# O( K<>制要求具体定义,参见有关Windows技术资料。用GetCommState()可以得到当前 </P>
9 y% Z; Z' J8 s<>的DCB参数值。如果需要还可通过SetCommTimeouts()和GetCommTomeouts()重新 </P>
: q7 V$ d% @* x( l! B, p<>设置读写的超时参数;读写缓冲区的设置使用SetupComm(),参数dwInQueue和 </P>4 x8 Y' U5 ^- I* I, |! A
<>dwOutQueue分别定义为输入和输出缓冲区的大小。 </P>
/ N4 N1 v5 B' h7 @6 L0 O8 T+ C9 z<>  </P>. d& ^: t  C: D, k2 T
<>  在串口初始化完毕后,还要建立与通信有关的事件对象。一般使用 </P>. \/ D6 p! K1 B" j" n/ r" C
<>CreateEvent()函数,它返回一事件句柄,其中参数lpEventAttributes指向安全 </P>
  k) p. C/ w" J( A4 a5 m<>属性结构地址,在Win 95(无安全属性)中为NULL;布尔参数bManualReset 定 </P>
0 O% ^9 e, v/ S% ^<>义事件重置方式,true 表示手工重置,false表示自动重置(相关函数为 </P>
. S; j* l& k) G7 F; T6 _<P>SetEvent()和ResetEvent());参数bInitialState定义事件初始状态,true表 </P>
0 j: J" f: |  h- z; {/ I. n<P>示发信号,否则为不发信号;lpName是为多进程设置的事件名,对于单进程定义 </P>
4 Q3 K. W; s' M0 i' L0 c+ G<P>为NULL。然后用SetCommMask()定义用户程序可监视的通信事件类别。 </P>
: v: B+ ^: m% c0 v- C6 d<P>  </P>
+ y- j4 ^, q& y' W' Z2 o$ g, i: D<P>  以上设置完成后,用户程序就可以等待通信事件的产生,一般调用函数 </P>; A$ h: Z4 O; D3 n( l' n7 p4 @
<P>WaitCommEvent()监视通信事件,其中参数lpEvtMask指向产生事件的掩码地址, </P>( r% ?6 s. @% h( y) T. e
<P>用于判断事件产生的性质,lpOverlapped指向重叠结构地址,可简单定义为 </P>
, g2 j- v5 R+ H<P>NULL。对于串口事件的响应一般有四种方式:查询、同步I/O、异步I/O和事件驱 </P>% I+ k4 ~- w$ l* \
<P>动I/O,需要根据用户不同控制要求而定。查询方式占用较长的计算机时间,同 </P>
! |- a3 x7 F* V" W4 H4 y, Z<P>步I/O方式直到读取完指定的字节数或超时时才返回,容易造成线程阻塞,异步 </P>1 u3 p  z/ w& v2 p
<P>I/O用于后台处理,事件驱动是由系统通知用户程序发生的事件并进行串口操作 </P>
* [8 j- |% I$ R# W8 ]<P>。 比较而言事件驱动I/O方式较灵活。 </P>. O! f1 ^, J+ j6 ~% @/ x, `% Y
<P>  </P>5 r8 y& C2 Z( |; V: Q- K! |
<P>  当有通信事件产生时,就可用函数ReadFile()和WriteFile()直接对串口缓 </P>
4 k4 o  h3 \4 X; V, ?' x! ~<P>冲区进行读写操作了。其中lpBuffer 指向读写缓冲区,nNumberOfBytes为要读 </P>
7 d8 A9 s( P# c( N- Y<P>写的字节数,lpNumberOfBytes为实际读写的字节数,lpOverlapped指定同步或 </P>
. u$ D( V( }7 y: X) X* p. N<P>异步操作。通信结束后,调用函数CloseHandle()将串口关闭。 </P>
: t+ {: l! [  ~7 k  L<P>  </P>5 q$ H0 n- t& E8 n4 I! L
<P>  ·应用实例说明· </P>
/ I0 r; Q' x# k8 X( b/ U<P>  </P>
2 ?- b, }+ [: ^4 X& c( l) J" t<P>  </P>7 l) s2 L( \$ \
<P>  使用以上的API函数,笔者给出了简化后的串口初始化的实例。图1为使用C </P>
: }. d  x6 R9 D4 O4 x<P>++ Builder 组件生成的串口通信基本参数设置的界面实例。 </P>3 l& @0 x8 ?% d: t* ~1 [) ?
<P>  </P>
1 M  Q1 u% A% @3 b2 ?6 n/ a<P>  HANDLE hcom; //定义句柄 </P>
# T- a1 @9 C) U<P>  </P>% e" a9 ~7 s$ I) A
<P>  DCB dcb; </P>6 @* k! l8 p4 U+ q; m
<P>  </P>
; [! M; x! o8 o$ e6 x# P" Q1 p. ]8 M  X<P>  OVERLAPPED e; //定义重叠结构 </P>
0 e1 C) o" W$ K4 k, L7 F9 U<P>  </P>7 E8 V9 Q8 q# v3 b
<P>  void —fastcall TForm1::OkBtnClick(TObject?Sender) </P>/ I- E; C9 u8 D' i. [+ B- K
<P>  </P>* e( h) Q) c; f4 ^6 \- {# f
<P>  { hcom=CreateFile("COM2",GENERIC—READ|GENERIC—WRITE,0,NULL,OPEN </P>4 q1 v1 D* ]2 P' H, B' a2 D
<P>—EXISTING, </P>- B) b4 f; Q9 D" ^7 o) g
<P>FILE—ATTRIBUTE—NORMAL|FILE—FLAG—OVERLAPPED,NULL); //打开通讯口 </P>
0 I8 h% }. p8 \4 Z5 a, N" F<P>  </P>( Q6 q$ S2 {# [
<P>   BuildCommDCB("9600,O,8,1",&dcb); </P>7 f5 ^3 E5 @5 S3 _! ]
<P>  </P>" u- O8 h5 [1 n& x' j
<P>//第一个字符串参数实际使用时由图1选择后组合,这里仅简单说明其格式 </P>
2 ?, S5 L; w( i  P$ l<P>  </P>
9 J8 K0 l3 l# i" C<P>   SetCommState(hcom,&dcb); </P>1 s5 v7 G' j4 ~: U
<P>  </P>  L( `# f2 @  S) D* {# c; o
<P>   SetupComm(hcom,512,512);//设置读写缓冲区 </P>
9 d9 L- {+ U' i<P>  </P>
7 h4 e" W& F' z# v9 v9 Y) z<P>   e.hEvent=CreateEvent(NULL,false,false,NULL); //设置事件 </P>
: n9 e' `/ Z  \( w<P>  </P>: F: @" D8 o3 z$ _
<P>   SetCommMask(hcom,EV—RXCHAR| EV—TXEMPTY); //设置事件掩码 </P>0 B4 j- V1 n! u1 S0 T
<P>  </P>
1 H% M8 ]* S" N) U<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-7-18 17:03 , Processed in 0.415790 second(s), 86 queries .

回顶部