QQ登录

只需要一步,快速开始

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

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

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

823

主题

3

听众

4048

积分

我的地盘我做主

该用户从未签到

发帖功臣 元老勋章

跳转到指定楼层
1#
发表于 2005-1-26 13:06 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
<>  </P>+ c/ g5 `: a: H% Q  o
<>姜滨 </P>
1 X( t3 m8 z( ?- l<>  </P>4 B/ o- J. Z. c; ]2 p
<>  ·串口操纵的基本方法· </P>
- S- q  ?1 j3 U1 H0 t<>  </P>
! X9 P; V+ n  W( R" D1 n2 }<>  </P>
3 t: C+ S* D$ B3 s<>  在Win32下,对串口的操作就如同对文件一样打开或关闭,对串行数据的读 </P>. d( _% j( T2 v( H. Z- J! d
<>写可在用户定义的读写缓冲区中进行。具体使用的函数为: </P>% x; J2 A0 D: C9 l# z
<>  </P>
6 R  T* M. J; B, O. [4 [<>  首先用CreateFile( )打开通信串口,其中参数lpFileName指向串口逻辑名 </P>
% h2 q) ^$ \' m' W<>,如“COM1”或“COM2”等,参数dwDesiredAccess定义文件的读写权限,一般 </P>
5 J. V; r3 u! t( v5 P" |<>设为GENERIC—READ|GENERIC—WRITE;参数dwShareMode定义资源共享方式,此 </P>' G( M9 ?6 q. M4 z7 B/ {
<>处必须设为0,为独占方式;lpSecurityAttributes定义安全属性,Win 95下为 </P>
- j! s: ]  U! o) |, w0 \0 q6 b  Q<>NULL;dwCreationDistribution定义文件创建方式;dwFlagsAndAttributes定义 </P>
: q" Y9 @, m" P6 N<>文件属性和标记,应设为FILE—FLAG—OVERLAPPED,表示异步通信方式; </P>0 f. n! e2 z; _
<>hTemplateFile 指向一个模板文件的句柄,在 Windows 95下为NULL。 </P>
. C2 r3 s+ x7 P<>  </P>7 s& y5 Y! J. K0 a6 p, S
<>  然后用BuildCommDCB( )和SetCommState( )函数通过通信设备控制块DCB( </P>
+ Q# U6 \  H. Y- [2 }# e<>Device Control Block)设置串口通信参数(如波特率、停止位、数据位、校验 </P>
% m  e2 e$ W. `$ l, q<>位等),其中BuildCommDCB( )中的字符串参数lpDef 定义同DOS命令中MODE的参 </P>
9 Q0 v: j3 J2 K4 @6 q<>数格式,关于DCB更具体的设置需要根据用户对数据流定义、握手信号及通信控 </P>
% B* V5 l+ x( L<>制要求具体定义,参见有关Windows技术资料。用GetCommState()可以得到当前 </P>5 _. [' P. M$ Q# b
<>的DCB参数值。如果需要还可通过SetCommTimeouts()和GetCommTomeouts()重新 </P>7 N0 I, d7 ~, j. u
<>设置读写的超时参数;读写缓冲区的设置使用SetupComm(),参数dwInQueue和 </P>
( h9 E3 |5 D0 V& y; ~<>dwOutQueue分别定义为输入和输出缓冲区的大小。 </P>
2 ]0 w9 I2 H& ?6 d7 l<>  </P>
* F, c" ?) g' L2 [; T- w( W# |4 Y<>  在串口初始化完毕后,还要建立与通信有关的事件对象。一般使用 </P>
6 _  G1 F4 c6 G7 f& G# @7 A. H<>CreateEvent()函数,它返回一事件句柄,其中参数lpEventAttributes指向安全 </P>
6 l6 [/ T, n" R7 T6 I<>属性结构地址,在Win 95(无安全属性)中为NULL;布尔参数bManualReset 定 </P>
) t, A) {1 N. Z2 Y" V; m- e<>义事件重置方式,true 表示手工重置,false表示自动重置(相关函数为 </P>
. w4 ?8 r$ @2 N9 E' G: D<P>SetEvent()和ResetEvent());参数bInitialState定义事件初始状态,true表 </P>& a2 u) e. ~7 Q3 n: |
<P>示发信号,否则为不发信号;lpName是为多进程设置的事件名,对于单进程定义 </P>0 y! u4 f+ B# j' P4 m% Z. k" x
<P>为NULL。然后用SetCommMask()定义用户程序可监视的通信事件类别。 </P>1 n' E4 h2 a0 j5 n' k' W9 W8 N2 g
<P>  </P>7 _, w6 a( N+ l7 \$ d( h4 n  a' P# k
<P>  以上设置完成后,用户程序就可以等待通信事件的产生,一般调用函数 </P>
- M4 C6 r; l, L6 L2 h2 [5 O7 A1 S<P>WaitCommEvent()监视通信事件,其中参数lpEvtMask指向产生事件的掩码地址, </P>. u3 _- `. f% e( [
<P>用于判断事件产生的性质,lpOverlapped指向重叠结构地址,可简单定义为 </P>
8 A% E* s8 q% k$ W) G; T# A2 n<P>NULL。对于串口事件的响应一般有四种方式:查询、同步I/O、异步I/O和事件驱 </P>. p2 [; q0 |) ]( n  w5 E
<P>动I/O,需要根据用户不同控制要求而定。查询方式占用较长的计算机时间,同 </P>
* J1 J5 D* R( W9 `4 ?: G6 t7 I6 e4 H<P>步I/O方式直到读取完指定的字节数或超时时才返回,容易造成线程阻塞,异步 </P>) g: B# w6 |. ?( n: v: l& @8 k
<P>I/O用于后台处理,事件驱动是由系统通知用户程序发生的事件并进行串口操作 </P>4 @' j0 h5 E0 a: e
<P>。 比较而言事件驱动I/O方式较灵活。 </P>
6 z# x& K4 {. N  O+ C! M1 c' }. J# a+ ?<P>  </P>$ Q3 {' A: g% i* i; j1 x* R% l0 _
<P>  当有通信事件产生时,就可用函数ReadFile()和WriteFile()直接对串口缓 </P>4 Y' v( o  d* z4 f5 @4 ~2 ?6 X* r
<P>冲区进行读写操作了。其中lpBuffer 指向读写缓冲区,nNumberOfBytes为要读 </P>
- Y# Q: W5 i: q<P>写的字节数,lpNumberOfBytes为实际读写的字节数,lpOverlapped指定同步或 </P>
: a$ j% A  g# i9 n4 P# @<P>异步操作。通信结束后,调用函数CloseHandle()将串口关闭。 </P>
6 L, d% y) x' x; u<P>  </P>8 h. R- ^, C$ k- A
<P>  ·应用实例说明· </P>
0 a" H, H4 _: Q( R% O<P>  </P>% O0 F: l7 G4 O, B% @
<P>  </P>
0 p- U  ?. j! n5 b% b# H* A<P>  使用以上的API函数,笔者给出了简化后的串口初始化的实例。图1为使用C </P>2 J( o' Z! P' g4 m& R
<P>++ Builder 组件生成的串口通信基本参数设置的界面实例。 </P>
% a' V# O+ O1 s( h2 w<P>  </P>  s6 }& J6 T% a
<P>  HANDLE hcom; //定义句柄 </P>
6 i" o7 _  B& N7 X<P>  </P># j9 J- }. K# Y
<P>  DCB dcb; </P>
- Q1 r$ D0 G8 \4 V/ s/ l<P>  </P>
2 x0 ^' }. ]3 _, s2 S<P>  OVERLAPPED e; //定义重叠结构 </P>3 U# A& c5 g9 [1 H
<P>  </P># L# K8 v$ x% o  b2 I8 |" h9 P! b
<P>  void —fastcall TForm1::OkBtnClick(TObject?Sender) </P>
1 K4 H; e) o) z<P>  </P>
2 \: Z: Z1 `* S' y<P>  { hcom=CreateFile("COM2",GENERIC—READ|GENERIC—WRITE,0,NULL,OPEN </P>) f% v2 P8 W1 [4 ^
<P>—EXISTING, </P>0 [9 q5 ^" _2 E
<P>FILE—ATTRIBUTE—NORMAL|FILE—FLAG—OVERLAPPED,NULL); //打开通讯口 </P>
+ t5 e  Y# U& l( T" i) n9 y<P>  </P>% s0 Z/ h4 C/ F( m( k- F  [$ H
<P>   BuildCommDCB("9600,O,8,1",&dcb); </P>
: Z$ f9 w, Y2 h- W# k<P>  </P>- h+ e( F* B) a% n) j
<P>//第一个字符串参数实际使用时由图1选择后组合,这里仅简单说明其格式 </P>
7 U. h3 z2 ~: Q2 t<P>  </P>
1 M' P4 F- G6 N5 r3 `3 v, K! E<P>   SetCommState(hcom,&dcb); </P>
/ @3 p  B' W6 k9 G<P>  </P>
' V* R  p6 X  V% Z6 P<P>   SetupComm(hcom,512,512);//设置读写缓冲区 </P>! |2 e" J9 ?+ G/ O( i: _+ m  o
<P>  </P>9 n4 _6 c) f6 o, H
<P>   e.hEvent=CreateEvent(NULL,false,false,NULL); //设置事件 </P>
; c  g, e4 e6 K  ?+ [7 U<P>  </P>- W  a6 Y6 ]& j' l
<P>   SetCommMask(hcom,EV—RXCHAR| EV—TXEMPTY); //设置事件掩码 </P>
. a- }3 g# f" K. b( N( m: c4 r<P>  </P>" _5 h/ {" P8 r: Q" |5 x! 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-9-2 04:39 , Processed in 0.440663 second(s), 86 queries .

回顶部