QQ登录

只需要一步,快速开始

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

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

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

823

主题

3

听众

4048

积分

我的地盘我做主

该用户从未签到

发帖功臣 元老勋章

跳转到指定楼层
1#
发表于 2005-1-26 13:06 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
<>  </P>1 _0 F  F' J& U/ @$ G
<>姜滨 </P>9 ?, B# L$ {4 H" N1 \4 O" B2 C- Q
<>  </P>- ^5 E6 l" d7 ]) b6 y+ D4 z
<>  ·串口操纵的基本方法· </P>1 C, U7 g( p/ _$ N$ m5 Y. t
<>  </P># H% c0 ]* D2 b& z3 q0 E
<>  </P>% |% e+ x, m9 M7 \
<>  在Win32下,对串口的操作就如同对文件一样打开或关闭,对串行数据的读 </P>
5 B, z' c. j% R4 v' S( }7 j$ x# e<>写可在用户定义的读写缓冲区中进行。具体使用的函数为: </P>
7 p7 u% M0 z% m+ Q( q5 M" C9 ~<>  </P>
5 |# m5 d" \$ c$ {<>  首先用CreateFile( )打开通信串口,其中参数lpFileName指向串口逻辑名 </P>
: m8 r4 p2 P! D4 e6 g<>,如“COM1”或“COM2”等,参数dwDesiredAccess定义文件的读写权限,一般 </P>
2 I0 F: `, Z% ?9 [; S) I<>设为GENERIC—READ|GENERIC—WRITE;参数dwShareMode定义资源共享方式,此 </P>
4 U7 ]) ^0 e% D. }* X( E. H1 H2 L<>处必须设为0,为独占方式;lpSecurityAttributes定义安全属性,Win 95下为 </P>  t8 m* o* q( q0 x8 [4 X# t
<>NULL;dwCreationDistribution定义文件创建方式;dwFlagsAndAttributes定义 </P>
' ], w; u+ q0 S( U2 i' {* d9 L0 ~<>文件属性和标记,应设为FILE—FLAG—OVERLAPPED,表示异步通信方式; </P>
, L9 k4 k' Z* I5 U- R8 O; {# I4 j, O<>hTemplateFile 指向一个模板文件的句柄,在 Windows 95下为NULL。 </P>9 [" w9 g7 Z, h% D2 B9 s% M
<>  </P>
: c, H% a# q- h; V0 `<>  然后用BuildCommDCB( )和SetCommState( )函数通过通信设备控制块DCB( </P>: T5 H" {! c/ Q1 {
<>Device Control Block)设置串口通信参数(如波特率、停止位、数据位、校验 </P>6 w0 d; s; D& `
<>位等),其中BuildCommDCB( )中的字符串参数lpDef 定义同DOS命令中MODE的参 </P>. R0 _5 E0 s8 S( v- T9 H
<>数格式,关于DCB更具体的设置需要根据用户对数据流定义、握手信号及通信控 </P>; c5 j. m0 V  [) H. }! E$ E
<>制要求具体定义,参见有关Windows技术资料。用GetCommState()可以得到当前 </P>
1 K% n8 O# v2 h) l- S<>的DCB参数值。如果需要还可通过SetCommTimeouts()和GetCommTomeouts()重新 </P>
( z& }+ `& B; C+ Q. U) z7 }$ `<>设置读写的超时参数;读写缓冲区的设置使用SetupComm(),参数dwInQueue和 </P>
& \" Q0 V4 k# G6 O! ?<>dwOutQueue分别定义为输入和输出缓冲区的大小。 </P>' m( R" ~$ J4 H" k$ i: E' n* b3 A/ ^
<>  </P>( M, M- e( n, b- ^
<>  在串口初始化完毕后,还要建立与通信有关的事件对象。一般使用 </P>
% J. M) ]- a8 }8 l<>CreateEvent()函数,它返回一事件句柄,其中参数lpEventAttributes指向安全 </P>
& X, I2 O( g/ |" e5 h2 U: C<>属性结构地址,在Win 95(无安全属性)中为NULL;布尔参数bManualReset 定 </P>- ^; `6 O' u0 ]8 e
<>义事件重置方式,true 表示手工重置,false表示自动重置(相关函数为 </P># f; x! G* C) C
<P>SetEvent()和ResetEvent());参数bInitialState定义事件初始状态,true表 </P>: n& R* w3 k% p1 B; X6 \
<P>示发信号,否则为不发信号;lpName是为多进程设置的事件名,对于单进程定义 </P>5 ^: f7 F0 t8 ]0 F) Y3 T
<P>为NULL。然后用SetCommMask()定义用户程序可监视的通信事件类别。 </P>
& ~$ h) L$ S, [& ]' s<P>  </P>
' d$ Q2 t+ h+ G$ ~- G& T- {7 X<P>  以上设置完成后,用户程序就可以等待通信事件的产生,一般调用函数 </P>
+ A+ ?4 l- w; V0 P  C4 T3 T<P>WaitCommEvent()监视通信事件,其中参数lpEvtMask指向产生事件的掩码地址, </P>
6 o/ b0 o. t' |1 c, K' c/ _# U+ S<P>用于判断事件产生的性质,lpOverlapped指向重叠结构地址,可简单定义为 </P>; L' [: R; f1 T$ B" I& k$ U4 h3 h) z
<P>NULL。对于串口事件的响应一般有四种方式:查询、同步I/O、异步I/O和事件驱 </P>
) s; i% O* a2 Q9 {% P7 _( P+ x<P>动I/O,需要根据用户不同控制要求而定。查询方式占用较长的计算机时间,同 </P>) j% L! |1 r0 M  q. n) z$ k
<P>步I/O方式直到读取完指定的字节数或超时时才返回,容易造成线程阻塞,异步 </P>7 i) U3 h5 Q5 m5 l3 o* R" d
<P>I/O用于后台处理,事件驱动是由系统通知用户程序发生的事件并进行串口操作 </P>
% `) B2 D; l, @( w! C- x( {" i<P>。 比较而言事件驱动I/O方式较灵活。 </P>, Y$ s5 T. d# L1 v8 T  N# ]
<P>  </P>
3 F5 W  v; A0 Q3 m<P>  当有通信事件产生时,就可用函数ReadFile()和WriteFile()直接对串口缓 </P>
1 k% p/ Y. o4 b7 w: g* l2 P<P>冲区进行读写操作了。其中lpBuffer 指向读写缓冲区,nNumberOfBytes为要读 </P>7 ^( D% w3 c$ ~4 c
<P>写的字节数,lpNumberOfBytes为实际读写的字节数,lpOverlapped指定同步或 </P>- X4 G+ Q2 a  m- o, ?
<P>异步操作。通信结束后,调用函数CloseHandle()将串口关闭。 </P>
( F: a4 a, N/ c<P>  </P>
) ^7 r3 X% B- b# F1 L! ]<P>  ·应用实例说明· </P>9 L* Y9 p7 Z! n4 v  H7 O- u6 f8 F
<P>  </P>
* E1 h8 j& e, ]; l/ F<P>  </P>
6 u' _1 R( c# y# y6 X<P>  使用以上的API函数,笔者给出了简化后的串口初始化的实例。图1为使用C </P>; D' k6 E  s4 j4 J
<P>++ Builder 组件生成的串口通信基本参数设置的界面实例。 </P>
' k# ?2 s! E/ q* q' t<P>  </P>
4 j) z+ Y* G! Y5 e0 d<P>  HANDLE hcom; //定义句柄 </P>! R$ `: p3 w( ]4 V8 b, y( w
<P>  </P>
" m$ E5 {# E( o3 Q9 R<P>  DCB dcb; </P>0 k) s% W- o, F- w3 b; q8 w0 m
<P>  </P>" T/ s/ P! z. @$ q4 [! A
<P>  OVERLAPPED e; //定义重叠结构 </P>
3 z4 i: A' u& C<P>  </P>& `4 R/ ~9 Q: S4 |9 S
<P>  void —fastcall TForm1::OkBtnClick(TObject?Sender) </P>" h7 u9 V( `1 O/ m8 Y( I- S  M
<P>  </P>
" x4 R  H/ V; Z2 _& \) w2 a<P>  { hcom=CreateFile("COM2",GENERIC—READ|GENERIC—WRITE,0,NULL,OPEN </P>
8 C& T5 [& A0 O& A% G  z<P>—EXISTING, </P>
$ A. Y0 p3 `( |- s. g<P>FILE—ATTRIBUTE—NORMAL|FILE—FLAG—OVERLAPPED,NULL); //打开通讯口 </P>+ z$ i/ k8 j4 |
<P>  </P>
! ?. U, S& ^; ^8 I, i; @% X6 E2 s<P>   BuildCommDCB("9600,O,8,1",&dcb); </P>
' v3 b1 B6 V* A( H+ n7 [9 M<P>  </P>% j* J# A7 x+ V
<P>//第一个字符串参数实际使用时由图1选择后组合,这里仅简单说明其格式 </P>
' x# c1 L4 a5 A, A<P>  </P>* O  t8 i0 ^9 b6 I
<P>   SetCommState(hcom,&dcb); </P>
1 ~# I  K( d- x( L<P>  </P>
) J& Q2 Y" R4 L: i: M. U<P>   SetupComm(hcom,512,512);//设置读写缓冲区 </P>' a- K) C. v. ~0 F7 a- v
<P>  </P>) ^  i& G: C0 S
<P>   e.hEvent=CreateEvent(NULL,false,false,NULL); //设置事件 </P>
* H! f* {  q; c6 j& D<P>  </P>) O6 q. n; W$ N5 f7 T, ^
<P>   SetCommMask(hcom,EV—RXCHAR| EV—TXEMPTY); //设置事件掩码 </P>
3 B8 t4 i; K' ]& S6 q- S  ^3 Y<P>  </P>9 E6 x' G. ?( O- r5 x
<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-6-14 15:03 , Processed in 0.468463 second(s), 86 queries .

回顶部