QQ登录

只需要一步,快速开始

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

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

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

823

主题

3

听众

4048

积分

我的地盘我做主

该用户从未签到

发帖功臣 元老勋章

跳转到指定楼层
1#
发表于 2005-1-26 13:06 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
<>  </P>
( s* m  x7 @* y% a<>姜滨 </P>% {* P7 O7 k# n: q5 U, B
<>  </P>
/ h- k+ L" E9 F  T<>  ·串口操纵的基本方法· </P>2 h2 f+ q. ]$ \) o6 R) N
<>  </P>5 o. `  w+ ?4 o4 M% u. p
<>  </P>. ~7 g5 e* S+ Z5 Z% p( d! u) V
<>  在Win32下,对串口的操作就如同对文件一样打开或关闭,对串行数据的读 </P>0 R( ~& T2 e& U( Z9 {6 o# b, ?
<>写可在用户定义的读写缓冲区中进行。具体使用的函数为: </P>& J8 W' l4 y" Q( j$ Z
<>  </P>
% M( r; I# j4 f$ k( J<>  首先用CreateFile( )打开通信串口,其中参数lpFileName指向串口逻辑名 </P>; x8 u+ I) S- L5 G) w; \
<>,如“COM1”或“COM2”等,参数dwDesiredAccess定义文件的读写权限,一般 </P>
" F' d) }$ b- u: r2 q/ S<>设为GENERIC—READ|GENERIC—WRITE;参数dwShareMode定义资源共享方式,此 </P>
# G3 x( q5 H  c/ Q' Y+ \<>处必须设为0,为独占方式;lpSecurityAttributes定义安全属性,Win 95下为 </P>
2 u. u: g) N* Q0 V* U<>NULL;dwCreationDistribution定义文件创建方式;dwFlagsAndAttributes定义 </P>( R/ M! g: ]8 \4 k9 L' q6 P5 x
<>文件属性和标记,应设为FILE—FLAG—OVERLAPPED,表示异步通信方式; </P>  N# n; D) S/ r
<>hTemplateFile 指向一个模板文件的句柄,在 Windows 95下为NULL。 </P>
4 `' z$ m& K" ]; p1 x: a6 f; X<>  </P>: O, S3 V: }( Z, S5 _
<>  然后用BuildCommDCB( )和SetCommState( )函数通过通信设备控制块DCB( </P>% W" K8 G+ f" ~
<>Device Control Block)设置串口通信参数(如波特率、停止位、数据位、校验 </P>0 u# I5 J' ^# q2 D6 i9 V5 x6 l
<>位等),其中BuildCommDCB( )中的字符串参数lpDef 定义同DOS命令中MODE的参 </P>
% M3 h, G( F2 {* g' z. A<>数格式,关于DCB更具体的设置需要根据用户对数据流定义、握手信号及通信控 </P>- ~4 a$ `+ Q; S4 s9 q( ~: z
<>制要求具体定义,参见有关Windows技术资料。用GetCommState()可以得到当前 </P>! R! e% i' ~2 b7 ~2 s: k% M) p
<>的DCB参数值。如果需要还可通过SetCommTimeouts()和GetCommTomeouts()重新 </P>+ S6 \' @: F2 r5 e
<>设置读写的超时参数;读写缓冲区的设置使用SetupComm(),参数dwInQueue和 </P>$ c% [+ W3 b% Q) [2 y. ~
<>dwOutQueue分别定义为输入和输出缓冲区的大小。 </P>
& ?+ l$ G: k  ^<>  </P>
6 e. k  Z" A; p! h<>  在串口初始化完毕后,还要建立与通信有关的事件对象。一般使用 </P>
& x; z9 n  X( F/ I8 @) x) M  N5 _<>CreateEvent()函数,它返回一事件句柄,其中参数lpEventAttributes指向安全 </P>2 J( ^6 G1 g6 S2 W4 M- g) n% s2 y/ ?
<>属性结构地址,在Win 95(无安全属性)中为NULL;布尔参数bManualReset 定 </P>, c8 ~2 y: F: `$ i+ H, w4 |
<>义事件重置方式,true 表示手工重置,false表示自动重置(相关函数为 </P>
# p: S* |1 \+ t; Q) P<P>SetEvent()和ResetEvent());参数bInitialState定义事件初始状态,true表 </P>1 \+ U4 \5 E! e4 Y7 b
<P>示发信号,否则为不发信号;lpName是为多进程设置的事件名,对于单进程定义 </P># [' ]2 v( F' g& d
<P>为NULL。然后用SetCommMask()定义用户程序可监视的通信事件类别。 </P>
* h9 L( z2 R% S<P>  </P>
& x4 I* c+ V; E( ]& A) D<P>  以上设置完成后,用户程序就可以等待通信事件的产生,一般调用函数 </P>% ?. P/ O: i* b$ h; t. F/ ~
<P>WaitCommEvent()监视通信事件,其中参数lpEvtMask指向产生事件的掩码地址, </P>
0 |3 h6 g2 y$ [* ?<P>用于判断事件产生的性质,lpOverlapped指向重叠结构地址,可简单定义为 </P>4 Z$ E' X* e. j  k. N+ `) n  B
<P>NULL。对于串口事件的响应一般有四种方式:查询、同步I/O、异步I/O和事件驱 </P>, p$ k9 O7 n" a( `
<P>动I/O,需要根据用户不同控制要求而定。查询方式占用较长的计算机时间,同 </P>
. K7 x5 Z: E5 V* E2 L<P>步I/O方式直到读取完指定的字节数或超时时才返回,容易造成线程阻塞,异步 </P>4 ^" G  G; n& u& o7 s1 H  j
<P>I/O用于后台处理,事件驱动是由系统通知用户程序发生的事件并进行串口操作 </P>* p5 j0 o) N8 o# A  D3 h7 g
<P>。 比较而言事件驱动I/O方式较灵活。 </P>6 t3 V0 q  \& |3 Z2 y! X' {
<P>  </P>
! j8 X0 z3 M- A+ X, u  d! N. c<P>  当有通信事件产生时,就可用函数ReadFile()和WriteFile()直接对串口缓 </P>
3 j4 r* C% s+ d; y0 x) ^<P>冲区进行读写操作了。其中lpBuffer 指向读写缓冲区,nNumberOfBytes为要读 </P>
/ A( S) l9 K/ a  M7 o/ q& e+ Q<P>写的字节数,lpNumberOfBytes为实际读写的字节数,lpOverlapped指定同步或 </P>
- g4 I+ Q! Z8 c1 Z' R<P>异步操作。通信结束后,调用函数CloseHandle()将串口关闭。 </P>& h3 A* |/ H$ S3 [) {5 T, K' p) H. z& H
<P>  </P>
; A  B: Z, S# p' U+ r% N<P>  ·应用实例说明· </P>2 O6 D% s% _6 a1 w( H
<P>  </P>. ~) b" g" f  I2 B4 I- P
<P>  </P>' E) U3 D6 D" C; _
<P>  使用以上的API函数,笔者给出了简化后的串口初始化的实例。图1为使用C </P>
+ U- l% i7 t: ?% G4 v+ V* r# o<P>++ Builder 组件生成的串口通信基本参数设置的界面实例。 </P>$ A0 o* M, E: X
<P>  </P>
* v3 e  l- ^- r% C, w<P>  HANDLE hcom; //定义句柄 </P>) Q# k8 G# ^# Y+ I1 E, X
<P>  </P>
% P( T& R) i* W) D) T. S! o, ?1 O<P>  DCB dcb; </P>: {4 z: h' X  D6 o  {! n
<P>  </P>: J+ x' u) r3 j- c
<P>  OVERLAPPED e; //定义重叠结构 </P>( A+ Q- v# q2 p% V# _1 e' B! Y  \9 Y+ H$ A
<P>  </P>
/ C% [8 J/ b6 `9 X<P>  void —fastcall TForm1::OkBtnClick(TObject?Sender) </P>
- f5 ]% e$ m6 {5 K<P>  </P>2 s, i$ R, {; t8 J9 I+ p
<P>  { hcom=CreateFile("COM2",GENERIC—READ|GENERIC—WRITE,0,NULL,OPEN </P>
* Z! Z7 t) S  I<P>—EXISTING, </P>! T9 ^. l4 J7 g6 b$ c/ C1 b) X2 B+ d
<P>FILE—ATTRIBUTE—NORMAL|FILE—FLAG—OVERLAPPED,NULL); //打开通讯口 </P>! j" {- \) \* W) f
<P>  </P>
" j" l2 F8 o* R' w- Q7 b( ~<P>   BuildCommDCB("9600,O,8,1",&dcb); </P>
% t% w2 Q% Z/ s) p! d' R<P>  </P>
) j, O8 _7 I. b; }8 m2 a<P>//第一个字符串参数实际使用时由图1选择后组合,这里仅简单说明其格式 </P>, z/ C' c" v* R" v! N6 [
<P>  </P>$ `6 ^  ?  V( L( w& z0 S
<P>   SetCommState(hcom,&dcb); </P>6 P0 {! d/ `* p8 |, c
<P>  </P>
' L  |; _, C, h" z8 f<P>   SetupComm(hcom,512,512);//设置读写缓冲区 </P>% d, ~6 Y8 \* e2 S% J% z7 u
<P>  </P>, }; m2 X6 |* \5 O9 l
<P>   e.hEvent=CreateEvent(NULL,false,false,NULL); //设置事件 </P>
3 b. o5 u. c/ M4 z: z4 @( d2 P<P>  </P>5 s( @+ i2 m& U9 o! a! G
<P>   SetCommMask(hcom,EV—RXCHAR| EV—TXEMPTY); //设置事件掩码 </P>! i$ O) p) ?/ t% i
<P>  </P>' X$ N& g1 o7 Z  ^7 d# C6 O
<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, 2024-4-19 13:32 , Processed in 0.753251 second(s), 85 queries .

回顶部