QQ登录

只需要一步,快速开始

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

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

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

823

主题

3

听众

4048

积分

我的地盘我做主

该用户从未签到

发帖功臣 元老勋章

跳转到指定楼层
1#
发表于 2005-1-26 13:06 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
<>  </P>
' q+ u2 j: F9 ?# T<>姜滨 </P>8 ?8 n2 f  s, X! w) F& m$ g% A
<>  </P>
* r5 a% i# O* Y0 C/ a5 d5 ]<>  ·串口操纵的基本方法· </P>
7 k# {% C1 J' c( u# e  l+ j<>  </P>6 m# q3 o8 J5 K) ~; c
<>  </P>
$ c0 N$ j) U: M5 u* x<>  在Win32下,对串口的操作就如同对文件一样打开或关闭,对串行数据的读 </P>; ~$ R& Y# s( B4 K( C( `4 N$ P
<>写可在用户定义的读写缓冲区中进行。具体使用的函数为: </P>
: f7 B* q5 l) M<>  </P>
- m' }) ^4 @4 h<>  首先用CreateFile( )打开通信串口,其中参数lpFileName指向串口逻辑名 </P>
- ^/ }6 U+ e! u<>,如“COM1”或“COM2”等,参数dwDesiredAccess定义文件的读写权限,一般 </P>" ?" W5 r, G# @& Z- m$ _' y& W5 T
<>设为GENERIC—READ|GENERIC—WRITE;参数dwShareMode定义资源共享方式,此 </P>) G" B1 i3 i2 r; o- ^0 h& _3 P
<>处必须设为0,为独占方式;lpSecurityAttributes定义安全属性,Win 95下为 </P>8 x7 [  U8 u( G& Y3 z: E
<>NULL;dwCreationDistribution定义文件创建方式;dwFlagsAndAttributes定义 </P>8 G4 {. X/ n) w; |
<>文件属性和标记,应设为FILE—FLAG—OVERLAPPED,表示异步通信方式; </P>9 a: c1 A9 M5 k
<>hTemplateFile 指向一个模板文件的句柄,在 Windows 95下为NULL。 </P>" C. R+ N& z3 v! d$ ~3 d1 p( {
<>  </P>- q! U+ z6 g: o9 T- h& @$ `3 E8 H
<>  然后用BuildCommDCB( )和SetCommState( )函数通过通信设备控制块DCB( </P>
1 r3 K  c  ]( j3 G4 n3 \<>Device Control Block)设置串口通信参数(如波特率、停止位、数据位、校验 </P>  D9 w' _" m* H( J- g& {( o
<>位等),其中BuildCommDCB( )中的字符串参数lpDef 定义同DOS命令中MODE的参 </P>
# H! O' e  U1 P' o4 w" ^$ M<>数格式,关于DCB更具体的设置需要根据用户对数据流定义、握手信号及通信控 </P>
; f, [' q) K" A1 U<>制要求具体定义,参见有关Windows技术资料。用GetCommState()可以得到当前 </P>$ }0 p- j8 [6 H4 G! F
<>的DCB参数值。如果需要还可通过SetCommTimeouts()和GetCommTomeouts()重新 </P>; W: P8 w" p! T9 M6 q1 Q  l
<>设置读写的超时参数;读写缓冲区的设置使用SetupComm(),参数dwInQueue和 </P>
$ m8 F3 m+ X; r) w<>dwOutQueue分别定义为输入和输出缓冲区的大小。 </P>
- h) \8 x  k4 E: V<>  </P>
& Q8 p- R) Y9 U; X) ?& h& P' h' X<>  在串口初始化完毕后,还要建立与通信有关的事件对象。一般使用 </P>! Q5 G- j. b: M# Y- v% t2 [4 y$ i
<>CreateEvent()函数,它返回一事件句柄,其中参数lpEventAttributes指向安全 </P>
; |. U1 c# O/ V# Q2 X/ A, v' v. Y4 R<>属性结构地址,在Win 95(无安全属性)中为NULL;布尔参数bManualReset 定 </P>; s+ y6 U9 b) a5 k& w
<>义事件重置方式,true 表示手工重置,false表示自动重置(相关函数为 </P>0 U+ F5 S& C0 f0 A- U1 B( N
<P>SetEvent()和ResetEvent());参数bInitialState定义事件初始状态,true表 </P>
9 D4 r  _( T5 n) m# i  W<P>示发信号,否则为不发信号;lpName是为多进程设置的事件名,对于单进程定义 </P>. _+ W6 l: p9 u
<P>为NULL。然后用SetCommMask()定义用户程序可监视的通信事件类别。 </P>
- J/ m" \4 A* H0 t! E- J) \1 \<P>  </P>9 h3 I, X& n8 [* C* S1 E3 q3 m7 U
<P>  以上设置完成后,用户程序就可以等待通信事件的产生,一般调用函数 </P>- N9 K0 O4 i  |+ T' J, w
<P>WaitCommEvent()监视通信事件,其中参数lpEvtMask指向产生事件的掩码地址, </P>1 z$ G5 m% _2 F3 E7 v2 ^' C
<P>用于判断事件产生的性质,lpOverlapped指向重叠结构地址,可简单定义为 </P>( g9 \2 M4 c; n. V! l6 X1 H
<P>NULL。对于串口事件的响应一般有四种方式:查询、同步I/O、异步I/O和事件驱 </P>
2 @3 Z* I# t: J<P>动I/O,需要根据用户不同控制要求而定。查询方式占用较长的计算机时间,同 </P>( u; b+ q; x  W/ d: [5 [
<P>步I/O方式直到读取完指定的字节数或超时时才返回,容易造成线程阻塞,异步 </P>1 ]7 B& S! \3 T& V# ~+ V; x' q
<P>I/O用于后台处理,事件驱动是由系统通知用户程序发生的事件并进行串口操作 </P>$ v% g# J0 l; s# g- r; e
<P>。 比较而言事件驱动I/O方式较灵活。 </P>- h# v) K5 V6 j4 I& P- C4 }
<P>  </P>+ E$ S/ Z' U3 A& z3 Z' x1 E% w
<P>  当有通信事件产生时,就可用函数ReadFile()和WriteFile()直接对串口缓 </P>' @- A2 m) u- [/ ~+ @9 h9 G: U
<P>冲区进行读写操作了。其中lpBuffer 指向读写缓冲区,nNumberOfBytes为要读 </P>& |5 P5 P' A3 `) r2 n& F1 ~
<P>写的字节数,lpNumberOfBytes为实际读写的字节数,lpOverlapped指定同步或 </P>
8 |. k8 ?  M; k2 y<P>异步操作。通信结束后,调用函数CloseHandle()将串口关闭。 </P>, f; ]- Q- y7 j
<P>  </P>
% q' n! d5 S; j# K* C- Q. S7 f- k  }0 j<P>  ·应用实例说明· </P>8 H) i& X1 J2 N- J
<P>  </P>
) j- e3 x) p  n<P>  </P>0 f( {: `* D6 D- E
<P>  使用以上的API函数,笔者给出了简化后的串口初始化的实例。图1为使用C </P>' m, q, F  j. s: Z7 P2 b
<P>++ Builder 组件生成的串口通信基本参数设置的界面实例。 </P>
( Z* V. M9 ~1 o  ]+ B5 R<P>  </P>: n7 c0 M, U! H, ~% J# X
<P>  HANDLE hcom; //定义句柄 </P>
/ {, f  n5 ?- `& f<P>  </P>
0 O+ N* [8 L/ W1 |3 u; @<P>  DCB dcb; </P>& o/ ^( X7 d8 A' C& {
<P>  </P>( N# ~- ]$ w; E. M8 X  d
<P>  OVERLAPPED e; //定义重叠结构 </P>
! r2 J0 @+ l7 N% z<P>  </P>
( W  N3 [9 b, |" T7 Q9 O9 F<P>  void —fastcall TForm1::OkBtnClick(TObject?Sender) </P>
' r. k1 h* m6 G- W<P>  </P>+ Q, G/ Y- }3 g2 H2 k
<P>  { hcom=CreateFile("COM2",GENERIC—READ|GENERIC—WRITE,0,NULL,OPEN </P>
+ o" p  e: g0 Q2 I' ], }<P>—EXISTING, </P>! ?# q' B, P3 ?# C) x8 n6 o5 b
<P>FILE—ATTRIBUTE—NORMAL|FILE—FLAG—OVERLAPPED,NULL); //打开通讯口 </P>
) z$ H1 r: G( ^4 v3 m<P>  </P>+ N" x$ B* G6 o4 ]
<P>   BuildCommDCB("9600,O,8,1",&dcb); </P>3 Z( {3 x9 A7 S# _, Q+ z4 x
<P>  </P>8 z% A% g; R- ]$ _& y
<P>//第一个字符串参数实际使用时由图1选择后组合,这里仅简单说明其格式 </P>6 t8 }# f2 f$ t% ?6 h1 W& ~* C
<P>  </P>
9 T5 C7 D$ }, m( q, ~5 d/ k<P>   SetCommState(hcom,&dcb); </P>
8 H) C: J; D+ }9 }! w<P>  </P>
1 d5 U( e. t. b" \<P>   SetupComm(hcom,512,512);//设置读写缓冲区 </P>' f+ M8 i* [% c1 q/ _9 Y9 w% r& F% Y
<P>  </P>) @$ O6 y% ~2 Q5 {
<P>   e.hEvent=CreateEvent(NULL,false,false,NULL); //设置事件 </P>- L+ R% }' v7 U
<P>  </P>+ E/ u- a$ a  J0 u1 v6 H- W
<P>   SetCommMask(hcom,EV—RXCHAR| EV—TXEMPTY); //设置事件掩码 </P>) N( \$ r6 v: B/ D
<P>  </P>
+ z/ x( K$ d0 y<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-20 18:18 , Processed in 2.638234 second(s), 85 queries .

回顶部