QQ登录

只需要一步,快速开始

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

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

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

823

主题

3

听众

4048

积分

我的地盘我做主

该用户从未签到

发帖功臣 元老勋章

跳转到指定楼层
1#
发表于 2005-1-26 13:06 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
<>  </P>6 \# |) W$ I# }7 Q. h
<>姜滨 </P>
. r- Y; v4 W# o/ ^# r; d<>  </P>
/ g0 o- ~% z, w' [<>  ·串口操纵的基本方法· </P>
  e( d8 J: G1 P/ _  r+ m" I: i<>  </P>, ^- M3 J. `/ l8 ^* |; K, L
<>  </P>+ q/ m8 B1 |8 o& f5 O
<>  在Win32下,对串口的操作就如同对文件一样打开或关闭,对串行数据的读 </P>/ E4 B& n- j6 I$ \1 z! h  L( {
<>写可在用户定义的读写缓冲区中进行。具体使用的函数为: </P>
; ~1 C; C/ I4 A" T<>  </P>, M7 [9 C$ W9 ~9 }0 {& |4 l# h
<>  首先用CreateFile( )打开通信串口,其中参数lpFileName指向串口逻辑名 </P>. ?/ V) j  i; q! `, u, [, b
<>,如“COM1”或“COM2”等,参数dwDesiredAccess定义文件的读写权限,一般 </P>
6 Y0 I4 y+ @4 O" `, ~3 z<>设为GENERIC—READ|GENERIC—WRITE;参数dwShareMode定义资源共享方式,此 </P>9 ^. y: J6 A( p+ `
<>处必须设为0,为独占方式;lpSecurityAttributes定义安全属性,Win 95下为 </P>
6 k* B# j* X) ~<>NULL;dwCreationDistribution定义文件创建方式;dwFlagsAndAttributes定义 </P>
  l: t6 U: Z0 ]8 h7 G! w2 h<>文件属性和标记,应设为FILE—FLAG—OVERLAPPED,表示异步通信方式; </P>
! Y% c, [( U+ r; c" {6 G9 S<>hTemplateFile 指向一个模板文件的句柄,在 Windows 95下为NULL。 </P>
$ L3 s. J- R1 o<>  </P>
# D2 X5 `* i7 z$ V<>  然后用BuildCommDCB( )和SetCommState( )函数通过通信设备控制块DCB( </P>
$ ~6 I9 I* u! X$ m" t! l<>Device Control Block)设置串口通信参数(如波特率、停止位、数据位、校验 </P>
+ n) ^) h* J& @. N$ ]<>位等),其中BuildCommDCB( )中的字符串参数lpDef 定义同DOS命令中MODE的参 </P>7 b& q% c* R: s
<>数格式,关于DCB更具体的设置需要根据用户对数据流定义、握手信号及通信控 </P>* K. Y3 o% X" w4 b0 }9 S
<>制要求具体定义,参见有关Windows技术资料。用GetCommState()可以得到当前 </P>
( ]- ]2 U; \0 {' p6 u2 T<>的DCB参数值。如果需要还可通过SetCommTimeouts()和GetCommTomeouts()重新 </P>
( T' p1 [& H+ w3 @% p<>设置读写的超时参数;读写缓冲区的设置使用SetupComm(),参数dwInQueue和 </P>
, Q# w* u5 F: C) n9 N<>dwOutQueue分别定义为输入和输出缓冲区的大小。 </P>8 u8 [9 R! Y' c) r7 m" j
<>  </P>2 ?# A! p+ j/ f+ w
<>  在串口初始化完毕后,还要建立与通信有关的事件对象。一般使用 </P>
0 ~$ j6 I: l" {; ]3 t2 L' T<>CreateEvent()函数,它返回一事件句柄,其中参数lpEventAttributes指向安全 </P>& J  _# S0 ]" i8 O
<>属性结构地址,在Win 95(无安全属性)中为NULL;布尔参数bManualReset 定 </P>
, \* \7 ]' s( \" S( m/ U4 z5 S" Q9 u) t<>义事件重置方式,true 表示手工重置,false表示自动重置(相关函数为 </P>
8 [" Q# V( x) @( o% W- t4 T8 e/ ]% L* E<P>SetEvent()和ResetEvent());参数bInitialState定义事件初始状态,true表 </P>
' y6 U( J7 j4 ?$ d2 {% X<P>示发信号,否则为不发信号;lpName是为多进程设置的事件名,对于单进程定义 </P>5 b, F7 X# A9 \0 y1 N
<P>为NULL。然后用SetCommMask()定义用户程序可监视的通信事件类别。 </P>
; p! ^+ z* d) H+ K<P>  </P>
( e. r  e) m& a+ U* K<P>  以上设置完成后,用户程序就可以等待通信事件的产生,一般调用函数 </P>, O1 b' }  V9 o& ~1 W# B. ], D* C
<P>WaitCommEvent()监视通信事件,其中参数lpEvtMask指向产生事件的掩码地址, </P>
0 a5 P5 H4 }4 _<P>用于判断事件产生的性质,lpOverlapped指向重叠结构地址,可简单定义为 </P>0 z0 [- E! ]8 x& J
<P>NULL。对于串口事件的响应一般有四种方式:查询、同步I/O、异步I/O和事件驱 </P>
: T* I. U) L1 N. V: g0 r<P>动I/O,需要根据用户不同控制要求而定。查询方式占用较长的计算机时间,同 </P>
& i& {5 i* A6 d" D0 M3 v1 Y9 s% a3 _<P>步I/O方式直到读取完指定的字节数或超时时才返回,容易造成线程阻塞,异步 </P>1 E; |* B/ ]1 c  y2 V: j) t' D
<P>I/O用于后台处理,事件驱动是由系统通知用户程序发生的事件并进行串口操作 </P>8 E7 D  t9 z7 ^* K4 `
<P>。 比较而言事件驱动I/O方式较灵活。 </P>& Y5 M& H0 o7 ]2 K$ y$ @6 I9 L
<P>  </P>- R+ T) j  w2 B" v
<P>  当有通信事件产生时,就可用函数ReadFile()和WriteFile()直接对串口缓 </P>
/ _. }( u  O# A6 ]; E2 @<P>冲区进行读写操作了。其中lpBuffer 指向读写缓冲区,nNumberOfBytes为要读 </P>
+ V# g# |3 |* ~' B2 w0 U- |<P>写的字节数,lpNumberOfBytes为实际读写的字节数,lpOverlapped指定同步或 </P>
9 k* C6 J, w6 j% v<P>异步操作。通信结束后,调用函数CloseHandle()将串口关闭。 </P>
. h1 p3 {/ V0 I3 ?7 S3 i9 g- [<P>  </P>
! L. Y* |5 H6 ]5 A( F<P>  ·应用实例说明· </P>
& n1 n$ l3 Q( H* a- s7 p<P>  </P>
# N$ b  x* r8 t- G- ?<P>  </P>. A6 ?5 {, u6 [3 b
<P>  使用以上的API函数,笔者给出了简化后的串口初始化的实例。图1为使用C </P>
, ~& Z1 T0 P) X+ e<P>++ Builder 组件生成的串口通信基本参数设置的界面实例。 </P>
# ^# h5 {9 a. U( H<P>  </P>
, K! Q+ N! J1 N4 R4 ~4 w4 L- b/ L<P>  HANDLE hcom; //定义句柄 </P>' Y7 Y! f# M; e, E; ~8 X" Y$ _" S
<P>  </P>
6 t# B+ d. G- {6 N<P>  DCB dcb; </P>* t' I8 I5 i2 @3 A2 D: ]4 u
<P>  </P>, C0 v: a/ Z+ c( i* v# d9 f$ B
<P>  OVERLAPPED e; //定义重叠结构 </P>! F, g  z0 G8 g9 W! E
<P>  </P>* D/ l9 X, Y2 m
<P>  void —fastcall TForm1::OkBtnClick(TObject?Sender) </P>0 K  t* R4 |6 a7 ?1 p0 h, ]
<P>  </P>8 x- r3 H$ X. ]% a
<P>  { hcom=CreateFile("COM2",GENERIC—READ|GENERIC—WRITE,0,NULL,OPEN </P>0 S& j9 w  R( d# }4 v
<P>—EXISTING, </P>  [7 {/ Q& A) n- \) ?2 m
<P>FILE—ATTRIBUTE—NORMAL|FILE—FLAG—OVERLAPPED,NULL); //打开通讯口 </P>* J6 l8 \. T' E2 D
<P>  </P>
5 w; w7 i, P! ?8 r, ^9 L. R<P>   BuildCommDCB("9600,O,8,1",&dcb); </P>
# u& t0 J) x; B- I) a9 {3 A<P>  </P>
9 o% _  ?1 h6 P9 u- b9 w<P>//第一个字符串参数实际使用时由图1选择后组合,这里仅简单说明其格式 </P>
7 P6 l* j8 z+ Q9 k. N" F<P>  </P>
+ T% F/ k3 B0 t0 @% f$ ]$ o6 Y8 s<P>   SetCommState(hcom,&dcb); </P>
: b/ n9 [. M9 |, J0 C" \; Z<P>  </P># q- M5 e$ Z: @7 @7 h) P. R. U
<P>   SetupComm(hcom,512,512);//设置读写缓冲区 </P>9 c" ~, u3 r: ~: {/ P
<P>  </P>
8 h$ c/ U7 g1 y9 h+ M+ \8 y<P>   e.hEvent=CreateEvent(NULL,false,false,NULL); //设置事件 </P>  Y) s' V8 U* R9 Q6 V/ l
<P>  </P>1 b. t% K& h; M/ b7 Z1 \0 i, j: q
<P>   SetCommMask(hcom,EV—RXCHAR| EV—TXEMPTY); //设置事件掩码 </P>6 t" v9 ?# d; p" a1 i- O& g* ?
<P>  </P>  d* ]+ _( K: h: t0 ]: C% H( }: c1 Q
<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-19 05:59 , Processed in 0.495648 second(s), 92 queries .

回顶部