QQ登录

只需要一步,快速开始

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

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

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

823

主题

3

听众

4048

积分

我的地盘我做主

该用户从未签到

发帖功臣 元老勋章

跳转到指定楼层
1#
发表于 2005-1-26 13:06 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
<>  </P>
) a$ q: p4 d# k( r' o. U$ v8 o9 w5 E! H<>姜滨 </P>( u9 R* f1 ?, Q5 E
<>  </P>" E( `( \. p0 z. k% r
<>  ·串口操纵的基本方法· </P>: A5 u  ]3 }, a. T
<>  </P>; o5 s& ^2 t4 n% \9 }% p
<>  </P>7 D& @7 \1 W3 r' [6 ~
<>  在Win32下,对串口的操作就如同对文件一样打开或关闭,对串行数据的读 </P>
  S  ]5 x1 h4 n. _' G<>写可在用户定义的读写缓冲区中进行。具体使用的函数为: </P>
4 e9 R/ r9 s- _) V8 N. P' M5 F<>  </P>
" @; \  }2 B0 g) B6 n  j0 c<>  首先用CreateFile( )打开通信串口,其中参数lpFileName指向串口逻辑名 </P>& l! |8 G6 G5 z6 m
<>,如“COM1”或“COM2”等,参数dwDesiredAccess定义文件的读写权限,一般 </P>/ R5 N/ C' `; z  g
<>设为GENERIC—READ|GENERIC—WRITE;参数dwShareMode定义资源共享方式,此 </P># A) N3 K6 j% z- `0 B1 a
<>处必须设为0,为独占方式;lpSecurityAttributes定义安全属性,Win 95下为 </P>
/ c& Y  [6 t) `# D. r<>NULL;dwCreationDistribution定义文件创建方式;dwFlagsAndAttributes定义 </P>- z2 u) W# G5 C# ]$ b
<>文件属性和标记,应设为FILE—FLAG—OVERLAPPED,表示异步通信方式; </P>
5 d  m  i, q. F; z: J<>hTemplateFile 指向一个模板文件的句柄,在 Windows 95下为NULL。 </P>
% B. W8 n& r( b# r3 _/ t( f8 k<>  </P>* E+ W/ d3 L4 c  C: U: I% ^8 G
<>  然后用BuildCommDCB( )和SetCommState( )函数通过通信设备控制块DCB( </P>, S# ]/ b$ h* |) I  j1 Q. G7 C" }
<>Device Control Block)设置串口通信参数(如波特率、停止位、数据位、校验 </P>
. D8 Q( K5 P/ q! s<>位等),其中BuildCommDCB( )中的字符串参数lpDef 定义同DOS命令中MODE的参 </P>
" V1 H5 W- d9 m1 y/ l9 e<>数格式,关于DCB更具体的设置需要根据用户对数据流定义、握手信号及通信控 </P>/ C; a. L: q+ X  U+ C/ H1 V
<>制要求具体定义,参见有关Windows技术资料。用GetCommState()可以得到当前 </P>8 C2 s/ y: m7 \' u
<>的DCB参数值。如果需要还可通过SetCommTimeouts()和GetCommTomeouts()重新 </P>
) {3 s8 K* u+ b! J! v4 T; b+ u<>设置读写的超时参数;读写缓冲区的设置使用SetupComm(),参数dwInQueue和 </P>
4 v/ U- `$ o" M9 ~<>dwOutQueue分别定义为输入和输出缓冲区的大小。 </P>7 {; h. j( |7 }
<>  </P>
! D2 E2 T) u& _7 E- ~/ f<>  在串口初始化完毕后,还要建立与通信有关的事件对象。一般使用 </P>
7 b# n5 q; X' T/ x  R* U& N; Z<>CreateEvent()函数,它返回一事件句柄,其中参数lpEventAttributes指向安全 </P>  `9 q7 q+ d0 S2 V
<>属性结构地址,在Win 95(无安全属性)中为NULL;布尔参数bManualReset 定 </P>, k. u; G* l6 X; j- U1 ~  o
<>义事件重置方式,true 表示手工重置,false表示自动重置(相关函数为 </P>
6 m; J, a  B8 V# S" O<P>SetEvent()和ResetEvent());参数bInitialState定义事件初始状态,true表 </P>! X* g, j3 R$ d5 `- Q
<P>示发信号,否则为不发信号;lpName是为多进程设置的事件名,对于单进程定义 </P>& E. e! S% h7 {4 U  @5 v7 |
<P>为NULL。然后用SetCommMask()定义用户程序可监视的通信事件类别。 </P>
& M1 r$ s7 N7 J6 {1 g<P>  </P>
9 O5 Z! l; h( s* I7 X. L, @<P>  以上设置完成后,用户程序就可以等待通信事件的产生,一般调用函数 </P>* m* F8 f+ q* {
<P>WaitCommEvent()监视通信事件,其中参数lpEvtMask指向产生事件的掩码地址, </P>7 n5 q; v! G3 [1 I; n
<P>用于判断事件产生的性质,lpOverlapped指向重叠结构地址,可简单定义为 </P>) \  g+ D/ o; [( P/ `- O" E/ l  K" Z# W
<P>NULL。对于串口事件的响应一般有四种方式:查询、同步I/O、异步I/O和事件驱 </P>
$ |7 l' d/ W5 \# _7 C# V<P>动I/O,需要根据用户不同控制要求而定。查询方式占用较长的计算机时间,同 </P>' ~' t( w- \' @4 h
<P>步I/O方式直到读取完指定的字节数或超时时才返回,容易造成线程阻塞,异步 </P>$ h, ^7 L2 p  c* n2 _) T
<P>I/O用于后台处理,事件驱动是由系统通知用户程序发生的事件并进行串口操作 </P>; `- g- M, h8 p) M3 E+ R
<P>。 比较而言事件驱动I/O方式较灵活。 </P>
1 u( W$ `& C& c+ v( u* h<P>  </P>
; @2 s5 B3 V+ [1 z! _4 U: @8 B& C<P>  当有通信事件产生时,就可用函数ReadFile()和WriteFile()直接对串口缓 </P>
0 u  [5 B: R/ u/ J<P>冲区进行读写操作了。其中lpBuffer 指向读写缓冲区,nNumberOfBytes为要读 </P>, e! T, z" X! Q$ Y: T
<P>写的字节数,lpNumberOfBytes为实际读写的字节数,lpOverlapped指定同步或 </P>
- Z) V/ [( Q7 m  M3 I<P>异步操作。通信结束后,调用函数CloseHandle()将串口关闭。 </P>
8 ], {  \' f$ ?7 \, i, M<P>  </P>
( l* A' a; a) W& Z5 z4 N<P>  ·应用实例说明· </P>
% a3 c1 Y2 P' t; m3 S<P>  </P>5 ~: E7 y+ n$ U, I5 A% P1 {5 C# u
<P>  </P>
' p3 R, x/ P. S- F<P>  使用以上的API函数,笔者给出了简化后的串口初始化的实例。图1为使用C </P>  O3 E9 F) o# G0 S7 q  S) @
<P>++ Builder 组件生成的串口通信基本参数设置的界面实例。 </P>
* d1 t# T% l# r- ?7 U<P>  </P>
# w) Q5 L6 H6 F$ j+ f' X# U) v<P>  HANDLE hcom; //定义句柄 </P>+ H# O/ M& Q. r6 E  t2 P! h
<P>  </P>* i0 L) o' n" R9 b4 t
<P>  DCB dcb; </P>- \. h( m/ G! `, G' d" `
<P>  </P>! l9 t# F, X5 E; c
<P>  OVERLAPPED e; //定义重叠结构 </P>
. v  n8 }2 G; \1 a  [+ x- }; k<P>  </P>
" V  c- E* O+ e$ ~2 d<P>  void —fastcall TForm1::OkBtnClick(TObject?Sender) </P>
3 _* k: {; p/ h1 R<P>  </P>
4 |, I1 v$ ^8 W9 t7 t( L. m<P>  { hcom=CreateFile("COM2",GENERIC—READ|GENERIC—WRITE,0,NULL,OPEN </P>! g0 Z( z' ^, f' S- H' h
<P>—EXISTING, </P>
$ V  |8 b, |( Z) `- G$ ]5 a8 K% \<P>FILE—ATTRIBUTE—NORMAL|FILE—FLAG—OVERLAPPED,NULL); //打开通讯口 </P>& X- l4 ?5 e+ o* s5 ]* M2 O
<P>  </P>: o! ^. [* y, B) X, Q# X1 A6 p# I
<P>   BuildCommDCB("9600,O,8,1",&dcb); </P>! Z/ ^6 W+ ]2 P7 C( O
<P>  </P>
2 t& _8 q: R2 U/ |' N$ [9 q<P>//第一个字符串参数实际使用时由图1选择后组合,这里仅简单说明其格式 </P>" R8 M( s. H9 h' v
<P>  </P>$ j. ~% g# Q: Y. I2 t* Q
<P>   SetCommState(hcom,&dcb); </P>7 G& f( @( F3 c
<P>  </P>
3 Y$ b* \3 R7 j. C4 `. b- o<P>   SetupComm(hcom,512,512);//设置读写缓冲区 </P>5 }" e$ D0 Y. P) |8 c6 s
<P>  </P>$ B5 i" F- t6 p% c
<P>   e.hEvent=CreateEvent(NULL,false,false,NULL); //设置事件 </P>- G8 P5 v+ M2 A
<P>  </P>
% T$ J- u: M' q4 Z$ S9 t# I# h2 R0 B<P>   SetCommMask(hcom,EV—RXCHAR| EV—TXEMPTY); //设置事件掩码 </P>( s( Z  T( X. ?/ `6 p2 Q
<P>  </P>
0 \+ R: ^5 |2 }& b3 L( A<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-8-7 16:02 , Processed in 1.732895 second(s), 86 queries .

回顶部