QQ登录

只需要一步,快速开始

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

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

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

823

主题

3

听众

4048

积分

我的地盘我做主

该用户从未签到

发帖功臣 元老勋章

跳转到指定楼层
1#
发表于 2005-1-26 13:06 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
<>  </P>
6 T/ ?9 z9 {, Q8 Y- C1 d: y& e9 e<>姜滨 </P>; e7 b7 k9 i# p- P! a# b
<>  </P>% A) @# i/ r$ L( K, ?& m% M
<>  ·串口操纵的基本方法· </P>
. {5 I3 Y! n/ W; z, y* E" _<>  </P>" D: h; |1 s- f
<>  </P>" s, [: R) D& M, U" }) @
<>  在Win32下,对串口的操作就如同对文件一样打开或关闭,对串行数据的读 </P>
6 V/ p: g: f6 h$ h<>写可在用户定义的读写缓冲区中进行。具体使用的函数为: </P>7 h! G  y9 T, w# X8 i
<>  </P>3 a0 g% l6 U7 _9 `4 z. }* N: Z8 K
<>  首先用CreateFile( )打开通信串口,其中参数lpFileName指向串口逻辑名 </P>% I% C! y8 h2 d4 j9 ?
<>,如“COM1”或“COM2”等,参数dwDesiredAccess定义文件的读写权限,一般 </P>
) P7 }1 a: @- G$ [<>设为GENERIC—READ|GENERIC—WRITE;参数dwShareMode定义资源共享方式,此 </P>6 T! G2 q4 o! |0 U
<>处必须设为0,为独占方式;lpSecurityAttributes定义安全属性,Win 95下为 </P>
+ u: G! u, V) X<>NULL;dwCreationDistribution定义文件创建方式;dwFlagsAndAttributes定义 </P>) R6 E% c% u2 a  l, n
<>文件属性和标记,应设为FILE—FLAG—OVERLAPPED,表示异步通信方式; </P>1 ^8 F% ^. M7 t! I! y3 i5 B4 x
<>hTemplateFile 指向一个模板文件的句柄,在 Windows 95下为NULL。 </P>
) Q4 U) |! M2 j' z<>  </P>: T! C2 ]( B6 Q$ Z
<>  然后用BuildCommDCB( )和SetCommState( )函数通过通信设备控制块DCB( </P>* t% i% W- T, ~% @
<>Device Control Block)设置串口通信参数(如波特率、停止位、数据位、校验 </P>
6 \: W  W& Z* G' G; u$ Q) p<>位等),其中BuildCommDCB( )中的字符串参数lpDef 定义同DOS命令中MODE的参 </P>1 c0 o% z/ b3 L+ Y/ Q9 |
<>数格式,关于DCB更具体的设置需要根据用户对数据流定义、握手信号及通信控 </P>1 ]9 a- z  T( T7 s* l4 `  t: c- \
<>制要求具体定义,参见有关Windows技术资料。用GetCommState()可以得到当前 </P>
+ @" n, m3 C( A# V' a<>的DCB参数值。如果需要还可通过SetCommTimeouts()和GetCommTomeouts()重新 </P>$ X. y3 y& Z0 |) ~
<>设置读写的超时参数;读写缓冲区的设置使用SetupComm(),参数dwInQueue和 </P>( m; P; c% X. w5 d! L3 J9 P
<>dwOutQueue分别定义为输入和输出缓冲区的大小。 </P>, b, ~5 d3 |$ A8 w+ g
<>  </P>6 g! S1 k% y5 P
<>  在串口初始化完毕后,还要建立与通信有关的事件对象。一般使用 </P>* P  h) }+ K" T" g* I
<>CreateEvent()函数,它返回一事件句柄,其中参数lpEventAttributes指向安全 </P>
; f! v) q0 |+ A$ S- C' b; X<>属性结构地址,在Win 95(无安全属性)中为NULL;布尔参数bManualReset 定 </P>
5 J( U) E8 g' n( f# f( ]& x<>义事件重置方式,true 表示手工重置,false表示自动重置(相关函数为 </P>1 B4 B& _% I% E8 _5 f
<P>SetEvent()和ResetEvent());参数bInitialState定义事件初始状态,true表 </P>
; t6 {% h5 @) a  i0 R  i' {# E<P>示发信号,否则为不发信号;lpName是为多进程设置的事件名,对于单进程定义 </P>
# x6 g5 O& Y5 M3 |<P>为NULL。然后用SetCommMask()定义用户程序可监视的通信事件类别。 </P>" ^  k. v9 _1 Q7 u0 ^
<P>  </P>
; B) n8 v2 H% y<P>  以上设置完成后,用户程序就可以等待通信事件的产生,一般调用函数 </P>) ~6 [/ a; I& [6 _2 E( z. n7 H
<P>WaitCommEvent()监视通信事件,其中参数lpEvtMask指向产生事件的掩码地址, </P>7 q& S' V9 Y: O  {2 J
<P>用于判断事件产生的性质,lpOverlapped指向重叠结构地址,可简单定义为 </P>$ F; X2 ]7 c% J% P5 a
<P>NULL。对于串口事件的响应一般有四种方式:查询、同步I/O、异步I/O和事件驱 </P>
. {% c6 e* K  y8 ^  ]<P>动I/O,需要根据用户不同控制要求而定。查询方式占用较长的计算机时间,同 </P>6 ^; z/ j& ^) f, s! y. P/ D
<P>步I/O方式直到读取完指定的字节数或超时时才返回,容易造成线程阻塞,异步 </P>7 I$ j. ?% A3 w% w/ m% u
<P>I/O用于后台处理,事件驱动是由系统通知用户程序发生的事件并进行串口操作 </P>
& M" P6 {1 n% Y" H<P>。 比较而言事件驱动I/O方式较灵活。 </P>; K! F& a* W8 ^
<P>  </P>: r8 \0 ~' [" @  {4 o
<P>  当有通信事件产生时,就可用函数ReadFile()和WriteFile()直接对串口缓 </P>
5 Y, G& Q9 F: Q2 b: e) R/ N6 L<P>冲区进行读写操作了。其中lpBuffer 指向读写缓冲区,nNumberOfBytes为要读 </P>
8 ?+ O8 N1 z4 a, S* f<P>写的字节数,lpNumberOfBytes为实际读写的字节数,lpOverlapped指定同步或 </P>1 x' \8 T9 _( C( }8 {8 w
<P>异步操作。通信结束后,调用函数CloseHandle()将串口关闭。 </P>6 H+ U7 _( O; E( S  ?
<P>  </P>7 m; X, Z( \, r
<P>  ·应用实例说明· </P>0 h0 ^  W' F& s. d8 `5 h
<P>  </P>0 P9 Z6 P0 m$ {) c& k3 e
<P>  </P>7 C9 X3 s' w* H& N2 i- V
<P>  使用以上的API函数,笔者给出了简化后的串口初始化的实例。图1为使用C </P>( Q- g$ O$ N$ V. b
<P>++ Builder 组件生成的串口通信基本参数设置的界面实例。 </P>
7 G8 |1 x' P9 i7 g1 c, J/ g4 _<P>  </P>+ i( o6 f" Z3 R- i  i2 m4 d9 H$ u# \
<P>  HANDLE hcom; //定义句柄 </P>. x& b( f6 A/ S  I& G
<P>  </P>
' _% X- f. E4 r4 _; m+ p) i) G% v3 u6 n: t<P>  DCB dcb; </P>
. Y, p2 w8 u: B( K) \, u. b<P>  </P>+ K1 b4 n- h" p% }
<P>  OVERLAPPED e; //定义重叠结构 </P>
5 M* e  k9 i  K" \; w, B1 f5 W<P>  </P>
% h+ X* H9 |+ W" P+ P9 N<P>  void —fastcall TForm1::OkBtnClick(TObject?Sender) </P>+ G$ [" H; R$ \: H6 B& ^
<P>  </P>
2 q3 F; l4 x2 C2 {5 h$ d. c<P>  { hcom=CreateFile("COM2",GENERIC—READ|GENERIC—WRITE,0,NULL,OPEN </P>- A5 `0 I  r- o' ?/ y0 t! @! |
<P>—EXISTING, </P>) Y9 r$ `% M# y( c6 d
<P>FILE—ATTRIBUTE—NORMAL|FILE—FLAG—OVERLAPPED,NULL); //打开通讯口 </P>
" M3 {2 q  q, B2 z8 \1 m<P>  </P>
" L  ?7 P* D* r; d$ n. J7 F<P>   BuildCommDCB("9600,O,8,1",&dcb); </P>4 Q5 u8 x! j5 K# N$ G
<P>  </P>
" x+ e  Q0 s& ^<P>//第一个字符串参数实际使用时由图1选择后组合,这里仅简单说明其格式 </P>
" N6 J( A6 G2 X/ N2 c7 h8 G<P>  </P>. V& @9 o% {  Z3 ?; a3 Z: V
<P>   SetCommState(hcom,&dcb); </P>) e, r4 l+ m7 J% m2 Y
<P>  </P>7 P7 i3 w1 d0 G8 v$ O2 n
<P>   SetupComm(hcom,512,512);//设置读写缓冲区 </P>
3 C8 t4 ^' k+ v: l<P>  </P>$ b! n3 E% Y# x- L
<P>   e.hEvent=CreateEvent(NULL,false,false,NULL); //设置事件 </P>
: P. ^8 q; s, x+ c<P>  </P>: T( A% t3 Z. q& U* g
<P>   SetCommMask(hcom,EV—RXCHAR| EV—TXEMPTY); //设置事件掩码 </P>' K- z# }" n8 k' o2 e1 ^5 ~. \; |
<P>  </P>
# d6 J) V$ h& e<P>   OkBtn-〉Enabled=false;} </P>
zan
转播转播0 分享淘帖0 分享分享0 收藏收藏0 支持支持0 反对反对0 微信微信
cjplove        

0

主题

0

听众

50

积分

升级  47.37%

该用户从未签到

新人进步奖

回复

使用道具 举报

cjplove        

0

主题

0

听众

50

积分

升级  47.37%

该用户从未签到

新人进步奖

回复

使用道具 举报

xtmlj        

0

主题

2

听众

95

积分

升级  94.74%

该用户从未签到

新人进步奖

回复

使用道具 举报

lhc_mike        

0

主题

2

听众

52

积分

升级  49.47%

该用户从未签到

新人进步奖

回复

使用道具 举报

ai8815 实名认证       

0

主题

3

听众

26

积分

升级  22.11%

该用户从未签到

自我介绍
呵呵 大家多多交流呀!!
回复

使用道具 举报

ai8815 实名认证       

0

主题

3

听众

26

积分

升级  22.11%

该用户从未签到

自我介绍
呵呵 大家多多交流呀!!
回复

使用道具 举报

8#
无效楼层,该帖已经被删除
您需要登录后才可以回帖 登录 | 注册地址

qq
收缩
  • 电话咨询

  • 04714969085
fastpost

关于我们| 联系我们| 诚征英才| 对外合作| 产品服务| QQ

手机版|Archiver| |繁體中文 手机客户端  

蒙公网安备 15010502000194号

Powered by Discuz! X2.5   © 2001-2013 数学建模网-数学中国 ( 蒙ICP备14002410号-3 蒙BBS备-0002号 )     论坛法律顾问:王兆丰

GMT+8, 2026-4-20 07:09 , Processed in 0.459459 second(s), 92 queries .

回顶部