QQ登录

只需要一步,快速开始

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

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

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

823

主题

3

听众

4048

积分

我的地盘我做主

该用户从未签到

发帖功臣 元老勋章

跳转到指定楼层
1#
发表于 2005-1-26 13:06 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
<>  </P>, q/ J, N+ ^; b3 B9 g
<>姜滨 </P>: I4 _; c5 j6 s0 q) d: S
<>  </P>, {' s/ J$ |$ v
<>  ·串口操纵的基本方法· </P>, O* O6 V- n& \. R4 f
<>  </P>
4 }: ]0 [8 a' m5 F0 j<>  </P>. U7 B3 X9 H/ `
<>  在Win32下,对串口的操作就如同对文件一样打开或关闭,对串行数据的读 </P>- }9 n1 z2 {" _  {: w7 z) Q0 h
<>写可在用户定义的读写缓冲区中进行。具体使用的函数为: </P>
' m" G7 [+ x6 v! P9 C5 t9 V% V9 X/ o6 |<>  </P>
/ u. ], [# I( w1 q/ b9 d<>  首先用CreateFile( )打开通信串口,其中参数lpFileName指向串口逻辑名 </P>
( D* J, T# J1 I2 Q5 A$ P( X! P<>,如“COM1”或“COM2”等,参数dwDesiredAccess定义文件的读写权限,一般 </P>! i0 H) F3 M8 p4 [2 ~
<>设为GENERIC—READ|GENERIC—WRITE;参数dwShareMode定义资源共享方式,此 </P>
0 ]2 p7 W9 x+ M8 Z$ K, Y# v. k<>处必须设为0,为独占方式;lpSecurityAttributes定义安全属性,Win 95下为 </P>
# \4 f$ [: W5 X2 o<>NULL;dwCreationDistribution定义文件创建方式;dwFlagsAndAttributes定义 </P>2 y) n$ I* u# U# |1 R/ ~+ F
<>文件属性和标记,应设为FILE—FLAG—OVERLAPPED,表示异步通信方式; </P>
- H6 M/ {' ?2 t8 h. ^& i<>hTemplateFile 指向一个模板文件的句柄,在 Windows 95下为NULL。 </P>& l, f4 G& D1 L* ~
<>  </P>& y  e/ _7 z1 m+ D7 v
<>  然后用BuildCommDCB( )和SetCommState( )函数通过通信设备控制块DCB( </P># \# U; Y/ ]4 a: v) w* X, t* N0 F$ F
<>Device Control Block)设置串口通信参数(如波特率、停止位、数据位、校验 </P>
' v, d2 d# [1 V, }! U7 G. `<>位等),其中BuildCommDCB( )中的字符串参数lpDef 定义同DOS命令中MODE的参 </P>
, z' [0 ]9 ^1 d! h<>数格式,关于DCB更具体的设置需要根据用户对数据流定义、握手信号及通信控 </P>& V7 M5 l9 {1 @* l
<>制要求具体定义,参见有关Windows技术资料。用GetCommState()可以得到当前 </P>
! x4 y4 z# Z/ Z. O$ a5 p, _* C' }<>的DCB参数值。如果需要还可通过SetCommTimeouts()和GetCommTomeouts()重新 </P>
3 r4 b5 E: ~; {4 c$ M1 S4 C<>设置读写的超时参数;读写缓冲区的设置使用SetupComm(),参数dwInQueue和 </P>; ?; n. P( [- Q3 a, s5 o! ]
<>dwOutQueue分别定义为输入和输出缓冲区的大小。 </P>: M" X8 g, f0 O" G# ?& R/ P
<>  </P>1 j% G$ V: I0 p4 S$ m# j1 O: k5 ~
<>  在串口初始化完毕后,还要建立与通信有关的事件对象。一般使用 </P>
6 L% l/ s( R% U2 U/ T<>CreateEvent()函数,它返回一事件句柄,其中参数lpEventAttributes指向安全 </P>
; P! S2 n/ l5 T0 z7 P<>属性结构地址,在Win 95(无安全属性)中为NULL;布尔参数bManualReset 定 </P>' ^! ?8 k5 N1 `+ s, s/ C
<>义事件重置方式,true 表示手工重置,false表示自动重置(相关函数为 </P>9 G% F1 r+ b* {% e2 w* j* Y0 B
<P>SetEvent()和ResetEvent());参数bInitialState定义事件初始状态,true表 </P>
7 R" C7 N4 F) H; q( ]<P>示发信号,否则为不发信号;lpName是为多进程设置的事件名,对于单进程定义 </P>
& z1 R. E9 p# O5 d<P>为NULL。然后用SetCommMask()定义用户程序可监视的通信事件类别。 </P>
- X/ e4 A) o2 M& ?- ^" @8 f- {<P>  </P>0 M. i- J, r5 z- ^
<P>  以上设置完成后,用户程序就可以等待通信事件的产生,一般调用函数 </P>
4 }- X# S; q7 S% ^<P>WaitCommEvent()监视通信事件,其中参数lpEvtMask指向产生事件的掩码地址, </P>% `! {& ]" O5 l$ B' p
<P>用于判断事件产生的性质,lpOverlapped指向重叠结构地址,可简单定义为 </P>
# Y1 Q$ K  R/ ~2 k) X<P>NULL。对于串口事件的响应一般有四种方式:查询、同步I/O、异步I/O和事件驱 </P>6 l% D" h& ?( Q  Q2 B$ Y
<P>动I/O,需要根据用户不同控制要求而定。查询方式占用较长的计算机时间,同 </P>1 i% d) h  Z2 n- Q
<P>步I/O方式直到读取完指定的字节数或超时时才返回,容易造成线程阻塞,异步 </P>8 n+ e4 h/ K% m5 }
<P>I/O用于后台处理,事件驱动是由系统通知用户程序发生的事件并进行串口操作 </P>* s" I: Y, J7 {1 ]8 r5 a
<P>。 比较而言事件驱动I/O方式较灵活。 </P>8 `5 u" e: u: ?
<P>  </P>
. x! Z0 o4 u! ~& m) {: M<P>  当有通信事件产生时,就可用函数ReadFile()和WriteFile()直接对串口缓 </P>$ v) K. @/ B4 M1 `" j4 ^/ I
<P>冲区进行读写操作了。其中lpBuffer 指向读写缓冲区,nNumberOfBytes为要读 </P>
: h6 `+ `3 F8 n0 H/ G<P>写的字节数,lpNumberOfBytes为实际读写的字节数,lpOverlapped指定同步或 </P>
& P, ^: S7 Z" x% v<P>异步操作。通信结束后,调用函数CloseHandle()将串口关闭。 </P>
  ^" U$ e) R6 D' R<P>  </P>
7 e6 \1 t, z( i% h/ |& f8 O<P>  ·应用实例说明· </P>6 R) _4 h( B* P
<P>  </P>* K- ?/ o1 J, A5 S
<P>  </P>1 d0 i& U9 l3 }& F: b$ m, [
<P>  使用以上的API函数,笔者给出了简化后的串口初始化的实例。图1为使用C </P>
) g: G/ E$ K! M+ t1 V& \<P>++ Builder 组件生成的串口通信基本参数设置的界面实例。 </P>' U( }; j" L+ B0 X
<P>  </P>
# q" I; @( r& V<P>  HANDLE hcom; //定义句柄 </P>3 ?+ w( ~& \0 |2 e8 K
<P>  </P>6 I) a- L( v' H8 W2 E
<P>  DCB dcb; </P>
' ?+ ?' c% m$ ~6 d3 |<P>  </P>
$ _' O$ R8 {6 N6 B# z<P>  OVERLAPPED e; //定义重叠结构 </P>9 S# l3 o0 Y( i# w
<P>  </P>/ v6 k! H# ^/ l1 W! K6 E6 I
<P>  void —fastcall TForm1::OkBtnClick(TObject?Sender) </P>
: j8 U+ U' T% F<P>  </P>
5 L/ z" x; U/ I1 ]! F: u0 p<P>  { hcom=CreateFile("COM2",GENERIC—READ|GENERIC—WRITE,0,NULL,OPEN </P>$ ]. F1 h' [2 _
<P>—EXISTING, </P>$ r4 W1 D: Y! G3 r
<P>FILE—ATTRIBUTE—NORMAL|FILE—FLAG—OVERLAPPED,NULL); //打开通讯口 </P>
$ h, k2 C% Z  E# A6 s3 D<P>  </P>1 ?$ {/ O! p6 O
<P>   BuildCommDCB("9600,O,8,1",&dcb); </P>; z' P; Q# E& x' o
<P>  </P>
- v5 Z3 J0 ?" K4 V5 c! a- Z7 |<P>//第一个字符串参数实际使用时由图1选择后组合,这里仅简单说明其格式 </P>0 c" R, X7 o7 f. k$ T' {
<P>  </P>. B& P7 P& ^5 F3 J; _
<P>   SetCommState(hcom,&dcb); </P>4 \) A. u3 ~# ?& f# K" R( B' C
<P>  </P>
4 j* W* G# f* U0 ?$ W1 Q4 Z<P>   SetupComm(hcom,512,512);//设置读写缓冲区 </P>/ j, P) Z/ Y6 |9 e
<P>  </P>
+ |. r' Z$ i. [( |<P>   e.hEvent=CreateEvent(NULL,false,false,NULL); //设置事件 </P>6 X) y, g+ V; l( v
<P>  </P>: b& c3 s0 ^/ E% ?7 I: A+ }" |
<P>   SetCommMask(hcom,EV—RXCHAR| EV—TXEMPTY); //设置事件掩码 </P>& b; \& w3 w) @
<P>  </P>/ ^5 v$ _, p8 @
<P>   OkBtn-〉Enabled=false;} </P>
zan
转播转播0 分享淘帖0 分享分享0 收藏收藏0 支持支持0 反对反对0 微信微信
cjplove        

0

主题

0

听众

50

积分

升级  47.37%

该用户从未签到

新人进步奖

回复

使用道具 举报

cjplove        

0

主题

0

听众

50

积分

升级  47.37%

该用户从未签到

新人进步奖

回复

使用道具 举报

xtmlj        

0

主题

2

听众

95

积分

升级  94.74%

该用户从未签到

新人进步奖

回复

使用道具 举报

lhc_mike        

0

主题

2

听众

52

积分

升级  49.47%

该用户从未签到

新人进步奖

回复

使用道具 举报

ai8815 实名认证       

0

主题

3

听众

26

积分

升级  22.11%

该用户从未签到

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

使用道具 举报

ai8815 实名认证       

0

主题

3

听众

26

积分

升级  22.11%

该用户从未签到

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

使用道具 举报

8#
无效楼层,该帖已经被删除
您需要登录后才可以回帖 登录 | 注册地址

qq
收缩
  • 电话咨询

  • 04714969085
fastpost

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

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

蒙公网安备 15010502000194号

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

GMT+8, 2026-9-1 09:36 , Processed in 0.638179 second(s), 91 queries .

回顶部