QQ登录

只需要一步,快速开始

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

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

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

823

主题

3

听众

4048

积分

我的地盘我做主

该用户从未签到

发帖功臣 元老勋章

跳转到指定楼层
1#
发表于 2005-1-26 13:06 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
<>  </P>
, R8 y; F6 i9 c<>姜滨 </P>0 d' x( _* ~7 u8 E% k
<>  </P>
9 c4 @! E2 J" X+ |<>  ·串口操纵的基本方法· </P>$ r, N* Y/ J; `+ t! R6 g. e
<>  </P>, `1 I: A' _% U  d% f9 B
<>  </P>
7 I3 f' L' Z, I* L<>  在Win32下,对串口的操作就如同对文件一样打开或关闭,对串行数据的读 </P>
$ O" x. _  E6 [0 |7 x2 ?; t5 ?<>写可在用户定义的读写缓冲区中进行。具体使用的函数为: </P>
- Z- {* z* u+ G% R: p! D3 m/ Q- w<>  </P>1 X7 E* ~' E3 V
<>  首先用CreateFile( )打开通信串口,其中参数lpFileName指向串口逻辑名 </P>( M) T/ D: s! ~7 j! C
<>,如“COM1”或“COM2”等,参数dwDesiredAccess定义文件的读写权限,一般 </P>5 Z! I7 ]( d/ r5 q  x
<>设为GENERIC—READ|GENERIC—WRITE;参数dwShareMode定义资源共享方式,此 </P>
! |) l: a- s+ [8 D& V+ Q<>处必须设为0,为独占方式;lpSecurityAttributes定义安全属性,Win 95下为 </P>
" Z& C, i9 k! ^2 Z. b1 ]<>NULL;dwCreationDistribution定义文件创建方式;dwFlagsAndAttributes定义 </P>: t2 j" g3 h! \
<>文件属性和标记,应设为FILE—FLAG—OVERLAPPED,表示异步通信方式; </P>) W; \+ y, K; z  a
<>hTemplateFile 指向一个模板文件的句柄,在 Windows 95下为NULL。 </P>( H! o% j' b$ G6 B9 F$ W7 ^
<>  </P>2 J- v( R% [* m6 C" s3 _2 I
<>  然后用BuildCommDCB( )和SetCommState( )函数通过通信设备控制块DCB( </P>- E" o, l8 K2 l
<>Device Control Block)设置串口通信参数(如波特率、停止位、数据位、校验 </P>
2 u* q6 \& v' o8 y5 {5 B! C<>位等),其中BuildCommDCB( )中的字符串参数lpDef 定义同DOS命令中MODE的参 </P>
9 p8 ^  t" P& S9 T& h. M) e- q' ^<>数格式,关于DCB更具体的设置需要根据用户对数据流定义、握手信号及通信控 </P>; `( C0 s/ C7 Z+ R/ Q
<>制要求具体定义,参见有关Windows技术资料。用GetCommState()可以得到当前 </P>
2 ?& j# W+ U% u" t# N<>的DCB参数值。如果需要还可通过SetCommTimeouts()和GetCommTomeouts()重新 </P>$ o: F/ v' h$ H( S; T+ _
<>设置读写的超时参数;读写缓冲区的设置使用SetupComm(),参数dwInQueue和 </P>
$ W# M2 a9 c# T<>dwOutQueue分别定义为输入和输出缓冲区的大小。 </P># [, C1 Z  Q8 d) J) S# T5 X) s
<>  </P>2 F0 I' ]6 F* J) j. D
<>  在串口初始化完毕后,还要建立与通信有关的事件对象。一般使用 </P>* N* G( p9 G% y5 w9 K% Z& j7 _
<>CreateEvent()函数,它返回一事件句柄,其中参数lpEventAttributes指向安全 </P>
, w, \: Y" W+ L9 T% T! x$ m<>属性结构地址,在Win 95(无安全属性)中为NULL;布尔参数bManualReset 定 </P>2 }% e9 g) R6 E8 Y6 t* N' ~1 E& `
<>义事件重置方式,true 表示手工重置,false表示自动重置(相关函数为 </P>- d! h" @4 f6 S0 y
<P>SetEvent()和ResetEvent());参数bInitialState定义事件初始状态,true表 </P>
0 I: |5 R& M3 p9 D/ w<P>示发信号,否则为不发信号;lpName是为多进程设置的事件名,对于单进程定义 </P>
; i% J- E6 t; j<P>为NULL。然后用SetCommMask()定义用户程序可监视的通信事件类别。 </P>
1 X7 ^- S1 I! J; _# L<P>  </P>
# s# k1 I6 I/ M8 j) B<P>  以上设置完成后,用户程序就可以等待通信事件的产生,一般调用函数 </P>
: o6 D8 J/ Y/ d+ d" C<P>WaitCommEvent()监视通信事件,其中参数lpEvtMask指向产生事件的掩码地址, </P>  c8 \# a( q& u0 p
<P>用于判断事件产生的性质,lpOverlapped指向重叠结构地址,可简单定义为 </P>' e- n% V1 S0 w. F0 F) [* H
<P>NULL。对于串口事件的响应一般有四种方式:查询、同步I/O、异步I/O和事件驱 </P>- m2 U" z9 \8 }9 v. w
<P>动I/O,需要根据用户不同控制要求而定。查询方式占用较长的计算机时间,同 </P>5 Y- i( M. \: @9 Y' L! q' ?
<P>步I/O方式直到读取完指定的字节数或超时时才返回,容易造成线程阻塞,异步 </P>
5 V6 D+ ]* c/ S2 k! ^# v1 ^. x4 E<P>I/O用于后台处理,事件驱动是由系统通知用户程序发生的事件并进行串口操作 </P>& O1 S- `3 n+ }* [
<P>。 比较而言事件驱动I/O方式较灵活。 </P>
  g$ g' \9 e! D: i( e0 Z4 N<P>  </P>
0 C/ J" r% b6 _! o; n5 h# l/ y<P>  当有通信事件产生时,就可用函数ReadFile()和WriteFile()直接对串口缓 </P>" ]) \2 K, R" O1 [8 ^+ ]
<P>冲区进行读写操作了。其中lpBuffer 指向读写缓冲区,nNumberOfBytes为要读 </P>, y7 v7 @6 v: b9 q; V" J& N& Z2 ?
<P>写的字节数,lpNumberOfBytes为实际读写的字节数,lpOverlapped指定同步或 </P>
. M% L$ l. C2 \" F2 ^<P>异步操作。通信结束后,调用函数CloseHandle()将串口关闭。 </P>
, E; W" F! Q( @* d) R0 D5 N<P>  </P>
1 p5 \( t1 J7 B6 |, `<P>  ·应用实例说明· </P>
) [$ T& Y( q. r& c; ^) W8 g6 x8 U/ S% u<P>  </P>8 v4 ]+ Y  H- C2 P
<P>  </P>5 O- C$ _, l$ h- B
<P>  使用以上的API函数,笔者给出了简化后的串口初始化的实例。图1为使用C </P>  V1 N! D* f/ k$ w2 E  i6 W
<P>++ Builder 组件生成的串口通信基本参数设置的界面实例。 </P>5 q% z- Q  m+ h2 H# Z1 T" B0 ]' ^
<P>  </P>
$ W0 U$ O, k* y1 S& |: Z$ h7 T<P>  HANDLE hcom; //定义句柄 </P>* M1 ~9 @( V& X/ M( J8 g8 R2 S+ ]( a
<P>  </P>" g; \& D5 k3 G' G: \; H3 v
<P>  DCB dcb; </P>2 M7 o6 a; }+ y* _+ T8 t6 |
<P>  </P>
& K; B. p( b; ]- L- v<P>  OVERLAPPED e; //定义重叠结构 </P>
! d, @" M! A  u7 n8 e1 z<P>  </P>/ J0 o, z" q2 |" }9 s/ l! g
<P>  void —fastcall TForm1::OkBtnClick(TObject?Sender) </P>
: ]# Q9 E( Y4 S) s& ~( i/ y, C: i<P>  </P>9 i. i# x4 |4 _% C7 a% L; }
<P>  { hcom=CreateFile("COM2",GENERIC—READ|GENERIC—WRITE,0,NULL,OPEN </P>& q; G4 D% H9 u$ V: Z( \: b6 c
<P>—EXISTING, </P>
9 g3 y; s2 k) i' ^<P>FILE—ATTRIBUTE—NORMAL|FILE—FLAG—OVERLAPPED,NULL); //打开通讯口 </P>
- ~9 |) Y! Y. @/ b; T& J, Q. w<P>  </P>
8 j( W# t, S& p<P>   BuildCommDCB("9600,O,8,1",&dcb); </P>
* q; G% {5 n$ @" `5 U# t% Q( e2 Q' I! U<P>  </P># z& k) Q) |% h$ U9 g* L
<P>//第一个字符串参数实际使用时由图1选择后组合,这里仅简单说明其格式 </P>
+ s5 V, q  I+ ~/ v* E% I9 q<P>  </P>
5 c- b5 c8 q! x# o  y/ X<P>   SetCommState(hcom,&dcb); </P>
9 V- ]! |" ~/ L$ m<P>  </P>
7 w* y" U- F5 o0 r4 ]  p<P>   SetupComm(hcom,512,512);//设置读写缓冲区 </P>
" A: b5 l6 Y6 c" w2 Y3 e& r5 Y<P>  </P>
3 ?! \+ _) A/ A1 t  t8 R$ W+ x<P>   e.hEvent=CreateEvent(NULL,false,false,NULL); //设置事件 </P>
# D$ y; J- q; L7 n$ |% I. S( s3 i<P>  </P>: b$ e2 W7 w% y; x
<P>   SetCommMask(hcom,EV—RXCHAR| EV—TXEMPTY); //设置事件掩码 </P>  f0 |# d2 w1 e7 V
<P>  </P>
. z' E2 ^5 }8 u' L$ W<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-5-26 01:19 , Processed in 0.523585 second(s), 85 queries .

回顶部