QQ登录

只需要一步,快速开始

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

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

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

823

主题

3

听众

4048

积分

我的地盘我做主

该用户从未签到

发帖功臣 元老勋章

跳转到指定楼层
1#
发表于 2005-1-26 13:06 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
<>  </P>
! I4 }% d* g* ~- M1 b& ~5 H<>姜滨 </P>
/ z7 _, h4 o( b$ K% n- q6 R1 ]<>  </P>8 i" t& _# D' }2 X
<>  ·串口操纵的基本方法· </P>/ ?" T! P# |0 S0 u( ]5 r
<>  </P>
. G' v* j: |% y  L' }" ]<>  </P>
  r0 Y' g0 T4 R<>  在Win32下,对串口的操作就如同对文件一样打开或关闭,对串行数据的读 </P>
2 l6 N# S% b* W<>写可在用户定义的读写缓冲区中进行。具体使用的函数为: </P>1 X: Z% x# k/ c+ [" o
<>  </P>
9 W- W+ u! d4 {. L: u. |) ~# Y: Q( x<>  首先用CreateFile( )打开通信串口,其中参数lpFileName指向串口逻辑名 </P>
6 M4 L  N. r8 o% w0 g1 c4 v<>,如“COM1”或“COM2”等,参数dwDesiredAccess定义文件的读写权限,一般 </P>
/ {7 }& _4 E& G<>设为GENERIC—READ|GENERIC—WRITE;参数dwShareMode定义资源共享方式,此 </P>
2 s1 v) Y0 a8 D# @- Q: O<>处必须设为0,为独占方式;lpSecurityAttributes定义安全属性,Win 95下为 </P>
9 v! T5 t, ~' K$ q6 f' n<>NULL;dwCreationDistribution定义文件创建方式;dwFlagsAndAttributes定义 </P>
' ^5 b3 ?. U- Y7 P: G( W: s# `<>文件属性和标记,应设为FILE—FLAG—OVERLAPPED,表示异步通信方式; </P>
( ]' o5 C0 J/ j2 @3 P5 o; X<>hTemplateFile 指向一个模板文件的句柄,在 Windows 95下为NULL。 </P>
4 b- R/ e! o8 v( U# G+ e<>  </P>- w  R/ V" x8 Q3 ?$ `( r
<>  然后用BuildCommDCB( )和SetCommState( )函数通过通信设备控制块DCB( </P>6 O" r* m6 V4 x/ v9 m+ Y/ w
<>Device Control Block)设置串口通信参数(如波特率、停止位、数据位、校验 </P>+ l9 s3 ^& H. H
<>位等),其中BuildCommDCB( )中的字符串参数lpDef 定义同DOS命令中MODE的参 </P>
% P$ b5 o7 G: Y+ l7 k. ~<>数格式,关于DCB更具体的设置需要根据用户对数据流定义、握手信号及通信控 </P>& q, Z" N1 h$ ~$ f& x
<>制要求具体定义,参见有关Windows技术资料。用GetCommState()可以得到当前 </P>
. \$ f  O. I# c  v<>的DCB参数值。如果需要还可通过SetCommTimeouts()和GetCommTomeouts()重新 </P>; e% @! V1 X% y( m
<>设置读写的超时参数;读写缓冲区的设置使用SetupComm(),参数dwInQueue和 </P>: S; [. Y! X/ L2 \
<>dwOutQueue分别定义为输入和输出缓冲区的大小。 </P>- F4 E0 W- \+ a9 V% f8 y
<>  </P>. N  A# q, _" V$ ~* ]
<>  在串口初始化完毕后,还要建立与通信有关的事件对象。一般使用 </P>* z1 R+ ~3 x7 I3 b
<>CreateEvent()函数,它返回一事件句柄,其中参数lpEventAttributes指向安全 </P>7 ]' L7 N& g" @) U
<>属性结构地址,在Win 95(无安全属性)中为NULL;布尔参数bManualReset 定 </P>1 ]6 Q" r* V! _  Z& T1 S
<>义事件重置方式,true 表示手工重置,false表示自动重置(相关函数为 </P>. v, T6 H# \6 T& f# A* I
<P>SetEvent()和ResetEvent());参数bInitialState定义事件初始状态,true表 </P>
" ?7 G5 H7 v3 J* ^; e<P>示发信号,否则为不发信号;lpName是为多进程设置的事件名,对于单进程定义 </P>( b+ C: S3 e; ]
<P>为NULL。然后用SetCommMask()定义用户程序可监视的通信事件类别。 </P>
$ z: u; ]( a  E; T) ]7 D7 b<P>  </P>
1 m; h$ k. ^5 d4 p1 }% Z<P>  以上设置完成后,用户程序就可以等待通信事件的产生,一般调用函数 </P>
6 J/ P1 \* w2 K% b3 c5 c1 o<P>WaitCommEvent()监视通信事件,其中参数lpEvtMask指向产生事件的掩码地址, </P>, [( X/ B: V, I/ m4 t0 r5 q. @  W' Q
<P>用于判断事件产生的性质,lpOverlapped指向重叠结构地址,可简单定义为 </P>: ^' P+ t# c3 ?4 J- J8 O
<P>NULL。对于串口事件的响应一般有四种方式:查询、同步I/O、异步I/O和事件驱 </P>; A  [  W! h# R0 l
<P>动I/O,需要根据用户不同控制要求而定。查询方式占用较长的计算机时间,同 </P>% k/ N5 ^. s( R& O
<P>步I/O方式直到读取完指定的字节数或超时时才返回,容易造成线程阻塞,异步 </P>, v2 Q, b# c% N; [
<P>I/O用于后台处理,事件驱动是由系统通知用户程序发生的事件并进行串口操作 </P>( f4 K$ t0 r: O/ l- b! }# L
<P>。 比较而言事件驱动I/O方式较灵活。 </P>
) {1 H4 `7 y' w  w+ j$ X& u7 A. j2 g<P>  </P>
! B& g* a. e  Z. ]0 B<P>  当有通信事件产生时,就可用函数ReadFile()和WriteFile()直接对串口缓 </P>
0 q# q) o5 U  U) K<P>冲区进行读写操作了。其中lpBuffer 指向读写缓冲区,nNumberOfBytes为要读 </P>9 h8 w# Y' @6 n7 F9 x8 n& N; P
<P>写的字节数,lpNumberOfBytes为实际读写的字节数,lpOverlapped指定同步或 </P>
. \! F" }. s6 A/ O<P>异步操作。通信结束后,调用函数CloseHandle()将串口关闭。 </P>
5 r$ _+ c1 p! ~8 S6 B2 W8 b, {0 q<P>  </P>
5 F' \/ Y5 |  {* E! E  u# d, N& c( S<P>  ·应用实例说明· </P>4 ?# l5 W3 ?& ~
<P>  </P>
3 l9 ^1 v2 t0 W5 b/ Z<P>  </P>: I) _) w& S2 I9 D  \
<P>  使用以上的API函数,笔者给出了简化后的串口初始化的实例。图1为使用C </P>; u- i! B. Q. m6 ^/ s# @
<P>++ Builder 组件生成的串口通信基本参数设置的界面实例。 </P>
$ `: S, I/ ]. j. p1 B<P>  </P>( ~- X* ?  N( |3 v
<P>  HANDLE hcom; //定义句柄 </P>
7 d2 ^% M5 R: g/ v; m; Z<P>  </P>* S6 R. |+ l% x" d' u7 j+ e
<P>  DCB dcb; </P>3 V  r/ A/ P/ u
<P>  </P>- i) E, Y$ T; A! a5 a
<P>  OVERLAPPED e; //定义重叠结构 </P>7 s3 |) A1 t' Q, L: U# K
<P>  </P>2 f; E9 @, ^" C3 p3 S( w  h
<P>  void —fastcall TForm1::OkBtnClick(TObject?Sender) </P>$ A7 z2 {# S# P6 N
<P>  </P>
- L9 I, c8 {. J1 n# d7 i, G+ g<P>  { hcom=CreateFile("COM2",GENERIC—READ|GENERIC—WRITE,0,NULL,OPEN </P>
5 ~3 [1 l4 T* P. ]9 @: O% A; @<P>—EXISTING, </P>
& q+ @- F2 Y/ b3 C<P>FILE—ATTRIBUTE—NORMAL|FILE—FLAG—OVERLAPPED,NULL); //打开通讯口 </P>
$ U7 r9 d7 t- c; k<P>  </P>* d* W! z) z  W- i. Z
<P>   BuildCommDCB("9600,O,8,1",&dcb); </P>
8 S; G9 n2 o0 B0 e& t6 C% g<P>  </P>
9 \; V  |- l  q0 }% w% a8 N<P>//第一个字符串参数实际使用时由图1选择后组合,这里仅简单说明其格式 </P>/ Q/ M! E6 x4 B1 N
<P>  </P>
. N0 k+ `! M2 j7 X7 T) e<P>   SetCommState(hcom,&dcb); </P>3 t$ F+ B9 w$ c0 s6 J
<P>  </P>
+ w; F% W0 ~9 k. |; t4 ~; P<P>   SetupComm(hcom,512,512);//设置读写缓冲区 </P>
! r: H5 [6 r. p, H5 ]( e9 m<P>  </P>
7 M" i/ l% z* |7 `' r<P>   e.hEvent=CreateEvent(NULL,false,false,NULL); //设置事件 </P>8 t6 m! t- c# i9 }
<P>  </P>
0 c. ]2 }4 H4 i& a5 r) f<P>   SetCommMask(hcom,EV—RXCHAR| EV—TXEMPTY); //设置事件掩码 </P>
& b) a. F) h$ `) Q  M<P>  </P>
8 N' b7 O3 N  z. [# G<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 15:01 , Processed in 2.813710 second(s), 85 queries .

回顶部