QQ登录

只需要一步,快速开始

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

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

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

823

主题

3

听众

4048

积分

我的地盘我做主

该用户从未签到

发帖功臣 元老勋章

跳转到指定楼层
1#
发表于 2005-1-26 13:06 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
<>  </P>& N, u+ E: d8 v8 E6 r. X; l. ]8 \
<>姜滨 </P>  i/ l8 y& f; k: \- |
<>  </P>
/ ]& r( ~$ ^& U- D<>  ·串口操纵的基本方法· </P>8 z3 n' u7 S! c  U! c* P$ B  a6 X
<>  </P>
) h: `' l) R9 t) L2 g- ], p<>  </P>. M3 O$ N/ A- X+ M: G5 [5 @
<>  在Win32下,对串口的操作就如同对文件一样打开或关闭,对串行数据的读 </P>
) g* X" ~- r8 h<>写可在用户定义的读写缓冲区中进行。具体使用的函数为: </P>
+ s& w2 i% J0 R  Y9 G<>  </P>' u) [! s; J6 ?& F" h
<>  首先用CreateFile( )打开通信串口,其中参数lpFileName指向串口逻辑名 </P>
* [* S/ `, M( V, z7 n( `! W<>,如“COM1”或“COM2”等,参数dwDesiredAccess定义文件的读写权限,一般 </P>
( ?1 r- a' r0 {9 ~<>设为GENERIC—READ|GENERIC—WRITE;参数dwShareMode定义资源共享方式,此 </P>
8 \* K$ d  E  i: U: e+ ~2 F8 X<>处必须设为0,为独占方式;lpSecurityAttributes定义安全属性,Win 95下为 </P>- w) E3 N) p- N1 I( o* {( Q  Q, f% C
<>NULL;dwCreationDistribution定义文件创建方式;dwFlagsAndAttributes定义 </P>9 Z+ N7 U4 i! [5 ^) H, Z' D
<>文件属性和标记,应设为FILE—FLAG—OVERLAPPED,表示异步通信方式; </P>6 l& D# P1 B+ r; {- d* F8 x+ O
<>hTemplateFile 指向一个模板文件的句柄,在 Windows 95下为NULL。 </P>
2 W# q& O& I! [  s$ x  b1 o<>  </P>: ^2 N" l# y" |3 q& v& H5 t
<>  然后用BuildCommDCB( )和SetCommState( )函数通过通信设备控制块DCB( </P>
; ]# F- k9 N) t; x* L$ F# R% D<>Device Control Block)设置串口通信参数(如波特率、停止位、数据位、校验 </P>7 y& |% B; x0 ?. ^
<>位等),其中BuildCommDCB( )中的字符串参数lpDef 定义同DOS命令中MODE的参 </P>
- y/ B: Y% ^9 O<>数格式,关于DCB更具体的设置需要根据用户对数据流定义、握手信号及通信控 </P>
6 x. K4 j  S% E<>制要求具体定义,参见有关Windows技术资料。用GetCommState()可以得到当前 </P>
: }# Q7 H4 }+ b" U0 g9 N8 p<>的DCB参数值。如果需要还可通过SetCommTimeouts()和GetCommTomeouts()重新 </P>' c$ s" h' b9 p8 ^9 X
<>设置读写的超时参数;读写缓冲区的设置使用SetupComm(),参数dwInQueue和 </P>7 r, k0 z; j5 B
<>dwOutQueue分别定义为输入和输出缓冲区的大小。 </P>
  E) i( Z$ l! P$ t- w5 r0 D5 p' B<>  </P>4 n; k& z2 v, Q6 ]: [
<>  在串口初始化完毕后,还要建立与通信有关的事件对象。一般使用 </P>
1 _; N( L6 f6 f' S4 |' m/ L<>CreateEvent()函数,它返回一事件句柄,其中参数lpEventAttributes指向安全 </P>) s* Z/ M0 R7 Z' Y) _
<>属性结构地址,在Win 95(无安全属性)中为NULL;布尔参数bManualReset 定 </P>
  t4 m& G# Z) t" K<>义事件重置方式,true 表示手工重置,false表示自动重置(相关函数为 </P>
5 L5 G- K, s' U<P>SetEvent()和ResetEvent());参数bInitialState定义事件初始状态,true表 </P>
4 g4 c( F2 [& ?% p<P>示发信号,否则为不发信号;lpName是为多进程设置的事件名,对于单进程定义 </P>
8 Y0 T3 D1 N. z% y* c<P>为NULL。然后用SetCommMask()定义用户程序可监视的通信事件类别。 </P>4 C; u: e6 V- I
<P>  </P>8 {5 u  Q+ |' x6 x1 f# x
<P>  以上设置完成后,用户程序就可以等待通信事件的产生,一般调用函数 </P>* Z3 a& }: k# t+ \
<P>WaitCommEvent()监视通信事件,其中参数lpEvtMask指向产生事件的掩码地址, </P>
! S( s( ^% ~0 R  T; V9 g$ e<P>用于判断事件产生的性质,lpOverlapped指向重叠结构地址,可简单定义为 </P>
% k% I" _& J" E  S. K<P>NULL。对于串口事件的响应一般有四种方式:查询、同步I/O、异步I/O和事件驱 </P>
7 O9 g/ @5 \: s  J2 I. I- ?7 J<P>动I/O,需要根据用户不同控制要求而定。查询方式占用较长的计算机时间,同 </P>
( o( t+ ]. X- y" y<P>步I/O方式直到读取完指定的字节数或超时时才返回,容易造成线程阻塞,异步 </P>
* E/ i3 g. ^0 L- j' Q<P>I/O用于后台处理,事件驱动是由系统通知用户程序发生的事件并进行串口操作 </P>
% V$ B. S8 i) s: u; s" s, l0 S( l- }/ I2 X7 ~<P>。 比较而言事件驱动I/O方式较灵活。 </P>: s; |/ E, |: u1 x# u
<P>  </P># V6 E4 v0 n5 ^' q; t) @8 J% b8 X& n
<P>  当有通信事件产生时,就可用函数ReadFile()和WriteFile()直接对串口缓 </P>) \$ R+ }7 ?2 t8 F* m( \5 v7 Z
<P>冲区进行读写操作了。其中lpBuffer 指向读写缓冲区,nNumberOfBytes为要读 </P>
6 ?! E! |3 |$ q4 l<P>写的字节数,lpNumberOfBytes为实际读写的字节数,lpOverlapped指定同步或 </P>: C9 h' C+ i# ?) v1 ^: e, N5 e
<P>异步操作。通信结束后,调用函数CloseHandle()将串口关闭。 </P>8 I7 a/ j4 x' G
<P>  </P>
) j& I/ @. H3 y* ~% W<P>  ·应用实例说明· </P>
4 g& w- ?9 K3 L/ I: k! V3 Z<P>  </P>/ E, N/ f7 N: Y
<P>  </P>0 o9 e) `. ]& O+ i4 ^
<P>  使用以上的API函数,笔者给出了简化后的串口初始化的实例。图1为使用C </P>
& f% s# n+ ~' [+ l) e2 x; }1 W<P>++ Builder 组件生成的串口通信基本参数设置的界面实例。 </P>
2 `  N, i, {- N) d3 N<P>  </P>- r8 @" x4 S: a
<P>  HANDLE hcom; //定义句柄 </P>. }7 [6 W( g2 c( a* o6 H8 s
<P>  </P>
6 |' S: ?- a7 L# q' s<P>  DCB dcb; </P>
6 Y2 \8 T* d# N) [4 K3 y$ l) X<P>  </P>
1 }3 T' b& S. @1 }4 M& ?<P>  OVERLAPPED e; //定义重叠结构 </P>
% S9 s3 K' y6 U$ y( q7 \8 S<P>  </P>
) M& _4 l; v8 e0 b; D<P>  void —fastcall TForm1::OkBtnClick(TObject?Sender) </P>
8 X" @7 P! |* f; e. u5 G<P>  </P>
2 r, ?+ G, `" I+ ~<P>  { hcom=CreateFile("COM2",GENERIC—READ|GENERIC—WRITE,0,NULL,OPEN </P>" u+ d1 j' H0 U5 C% y! U' v1 Y8 W# j' w
<P>—EXISTING, </P>
' J9 Y. u7 Y- p3 B  Z<P>FILE—ATTRIBUTE—NORMAL|FILE—FLAG—OVERLAPPED,NULL); //打开通讯口 </P>
% j8 v# V5 c6 T5 f<P>  </P>5 X' z. x4 d( \2 ~9 z9 A; r& }
<P>   BuildCommDCB("9600,O,8,1",&dcb); </P>9 T% }/ K1 ~! F1 C4 j/ S3 x
<P>  </P>
1 D! Y4 r& z2 k9 m% ?7 o3 t<P>//第一个字符串参数实际使用时由图1选择后组合,这里仅简单说明其格式 </P>
* I  B  u7 ^/ l9 X<P>  </P>; U8 Y: ]! j% h1 g" k
<P>   SetCommState(hcom,&dcb); </P>; C1 L) C" m8 l
<P>  </P>
7 ~/ E9 D( D* p% G' }<P>   SetupComm(hcom,512,512);//设置读写缓冲区 </P>
# W/ Y( G2 ]# i" W# z<P>  </P>
; _) r; h# ]$ e# m/ Q4 G<P>   e.hEvent=CreateEvent(NULL,false,false,NULL); //设置事件 </P>
" y$ T7 Q! s5 ^% J; J. n! j) A<P>  </P>
' `4 _6 B6 v" F) M/ b<P>   SetCommMask(hcom,EV—RXCHAR| EV—TXEMPTY); //设置事件掩码 </P>1 I) g5 K3 c1 M$ ?8 G  b
<P>  </P>
* H! g! }# I& d# p, H2 Y2 D<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-17 23:15 , Processed in 0.341084 second(s), 85 queries .

回顶部