QQ登录

只需要一步,快速开始

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

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

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

823

主题

3

听众

4048

积分

我的地盘我做主

该用户从未签到

发帖功臣 元老勋章

跳转到指定楼层
1#
发表于 2005-1-26 13:06 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
<>  </P>% r# M: D% u6 u6 T: \. d
<>姜滨 </P>
0 z. {0 V1 o5 S3 ], b5 t<>  </P>
4 R+ v2 W6 M8 \  N9 Q; E  U$ f/ y<>  ·串口操纵的基本方法· </P>
" A( }4 ]6 E3 U9 W5 |<>  </P>
  @+ W4 r8 F9 P* u/ B<>  </P>
2 E7 g8 v1 I/ e<>  在Win32下,对串口的操作就如同对文件一样打开或关闭,对串行数据的读 </P>- Q4 T( p! H. h5 g( z  X
<>写可在用户定义的读写缓冲区中进行。具体使用的函数为: </P>
* X" b& ~  L; ~" s<>  </P>/ e$ \0 ]. J$ h( x0 V% N
<>  首先用CreateFile( )打开通信串口,其中参数lpFileName指向串口逻辑名 </P>
* Z7 Y) o6 t- k<>,如“COM1”或“COM2”等,参数dwDesiredAccess定义文件的读写权限,一般 </P>
6 C6 C7 L$ ]/ p1 s4 `% l# H, n0 T: ^<>设为GENERIC—READ|GENERIC—WRITE;参数dwShareMode定义资源共享方式,此 </P>
0 x; p! H% R+ \% h9 @<>处必须设为0,为独占方式;lpSecurityAttributes定义安全属性,Win 95下为 </P>( L* s; |; y$ q+ ]) S$ B1 w0 q" `6 ~
<>NULL;dwCreationDistribution定义文件创建方式;dwFlagsAndAttributes定义 </P>: Q  L* A6 K1 C- a
<>文件属性和标记,应设为FILE—FLAG—OVERLAPPED,表示异步通信方式; </P>
6 \: ?1 j) F2 Z/ H9 b; K<>hTemplateFile 指向一个模板文件的句柄,在 Windows 95下为NULL。 </P>
, h* F* d2 Q9 y1 c. i/ Q# c7 S& V<>  </P>
" L& C6 M! T5 b' \<>  然后用BuildCommDCB( )和SetCommState( )函数通过通信设备控制块DCB( </P>* H9 i, E2 O& p7 |+ C; }
<>Device Control Block)设置串口通信参数(如波特率、停止位、数据位、校验 </P>, b* q5 h6 l% V
<>位等),其中BuildCommDCB( )中的字符串参数lpDef 定义同DOS命令中MODE的参 </P>& N5 e& Y4 v/ k3 B% o
<>数格式,关于DCB更具体的设置需要根据用户对数据流定义、握手信号及通信控 </P>3 ]9 \. ~6 E( E! E% s5 u6 F
<>制要求具体定义,参见有关Windows技术资料。用GetCommState()可以得到当前 </P>/ G: w' W0 U9 Y, F( U3 U# {
<>的DCB参数值。如果需要还可通过SetCommTimeouts()和GetCommTomeouts()重新 </P>2 _. V4 i0 e" M
<>设置读写的超时参数;读写缓冲区的设置使用SetupComm(),参数dwInQueue和 </P>
: t/ V, A; [6 I; ~<>dwOutQueue分别定义为输入和输出缓冲区的大小。 </P>
4 _. @# M7 ]$ k<>  </P>
9 k: `5 A7 F" e. E2 r<>  在串口初始化完毕后,还要建立与通信有关的事件对象。一般使用 </P>
& y8 z! Y4 T) s( F( t<>CreateEvent()函数,它返回一事件句柄,其中参数lpEventAttributes指向安全 </P>9 s) ]  K0 r2 H+ H+ u& B
<>属性结构地址,在Win 95(无安全属性)中为NULL;布尔参数bManualReset 定 </P>
. Z2 _" J, C3 Z$ a/ ~; `! \: U9 M<>义事件重置方式,true 表示手工重置,false表示自动重置(相关函数为 </P>
8 P# Z6 j: m2 G' D% y6 l1 z<P>SetEvent()和ResetEvent());参数bInitialState定义事件初始状态,true表 </P>
; E  S0 ^2 S- ]. l+ _<P>示发信号,否则为不发信号;lpName是为多进程设置的事件名,对于单进程定义 </P>
5 d9 M% X9 @$ c" K8 \3 T' F. g<P>为NULL。然后用SetCommMask()定义用户程序可监视的通信事件类别。 </P>
. H- x9 h" W# l9 r% ]! S, B6 X3 M2 q- i<P>  </P>
6 V( a6 z" M) A$ ?& v( L8 V4 |$ x5 Z<P>  以上设置完成后,用户程序就可以等待通信事件的产生,一般调用函数 </P>  S& G' [  d/ z0 v; R  G: j
<P>WaitCommEvent()监视通信事件,其中参数lpEvtMask指向产生事件的掩码地址, </P>6 c/ E& \5 d7 V
<P>用于判断事件产生的性质,lpOverlapped指向重叠结构地址,可简单定义为 </P>7 ~4 H8 x! d; n- s5 k/ u/ o" R
<P>NULL。对于串口事件的响应一般有四种方式:查询、同步I/O、异步I/O和事件驱 </P>9 K- [# h' C' W8 T$ F; I
<P>动I/O,需要根据用户不同控制要求而定。查询方式占用较长的计算机时间,同 </P>" D3 A9 g3 L' C8 q1 p/ h1 h' G
<P>步I/O方式直到读取完指定的字节数或超时时才返回,容易造成线程阻塞,异步 </P>" ~+ x  _. j# x2 g4 Q
<P>I/O用于后台处理,事件驱动是由系统通知用户程序发生的事件并进行串口操作 </P>
+ \7 C8 F# r6 A/ ~' \<P>。 比较而言事件驱动I/O方式较灵活。 </P>8 x6 X4 {/ N# M4 D  ?1 t
<P>  </P>
! P" x0 w) M7 L) D( u<P>  当有通信事件产生时,就可用函数ReadFile()和WriteFile()直接对串口缓 </P>
/ A8 W6 G5 K0 N5 h% A* i0 ~<P>冲区进行读写操作了。其中lpBuffer 指向读写缓冲区,nNumberOfBytes为要读 </P>. H7 q( k! E  w. b: ], I
<P>写的字节数,lpNumberOfBytes为实际读写的字节数,lpOverlapped指定同步或 </P>
- r4 ~2 j! U+ r<P>异步操作。通信结束后,调用函数CloseHandle()将串口关闭。 </P>2 Z, }' n. d7 w. {$ S& a) {
<P>  </P>
& r3 {- w  F/ _" s9 K' j<P>  ·应用实例说明· </P>
8 n9 I' w: c/ O' N: ^6 W) O+ k<P>  </P>
! ^# ^5 G& Z+ Y/ k<P>  </P>
" M1 C& x$ t7 T3 A# k<P>  使用以上的API函数,笔者给出了简化后的串口初始化的实例。图1为使用C </P>
" c* `7 `+ y# a7 j4 s/ g. G<P>++ Builder 组件生成的串口通信基本参数设置的界面实例。 </P>
! l& P& S: G/ P7 Z. |0 P) ^+ u<P>  </P>3 {3 L% C- e7 x. U
<P>  HANDLE hcom; //定义句柄 </P>& K2 u( h( |+ }. V2 O0 U
<P>  </P>
  }$ \! |4 H) s! h<P>  DCB dcb; </P>! Q; D3 T, v) ?% x! D9 ]
<P>  </P>
2 g3 e6 P3 s4 ^<P>  OVERLAPPED e; //定义重叠结构 </P>
( L* P) k* v1 W4 M$ P3 W$ e<P>  </P>
/ `1 r. g+ J  y. y$ C# Q) j<P>  void —fastcall TForm1::OkBtnClick(TObject?Sender) </P>
& O, @, H$ U0 u8 ~- o<P>  </P>( j; M: u& m$ Y' V3 b, l  D
<P>  { hcom=CreateFile("COM2",GENERIC—READ|GENERIC—WRITE,0,NULL,OPEN </P>
9 [1 b- U* l, D* w  b7 J0 m6 k) O3 ?<P>—EXISTING, </P>, X4 J3 H3 R2 @) h
<P>FILE—ATTRIBUTE—NORMAL|FILE—FLAG—OVERLAPPED,NULL); //打开通讯口 </P>2 M5 j# ~  |5 L" ?! ?
<P>  </P>% w0 E" ?( n. O3 {! `
<P>   BuildCommDCB("9600,O,8,1",&dcb); </P>" n8 h. j5 @+ B2 C6 o
<P>  </P>& S/ ?( f* a0 A/ J1 k! F
<P>//第一个字符串参数实际使用时由图1选择后组合,这里仅简单说明其格式 </P>' H9 V6 _5 q) A* n$ U$ R* D5 u
<P>  </P>
. d2 D/ E1 c) ]: v<P>   SetCommState(hcom,&dcb); </P>% l+ j2 r9 Q& z0 h) b3 y1 K
<P>  </P>
. X+ Q* |, U& L) G' \6 t; r<P>   SetupComm(hcom,512,512);//设置读写缓冲区 </P>
; t+ ~' z0 K  W+ y1 o0 w<P>  </P>
" A. h+ ]9 A! H' o, E. @6 ]<P>   e.hEvent=CreateEvent(NULL,false,false,NULL); //设置事件 </P>' O/ l* l- _0 \0 {* d7 b- `7 ]0 m
<P>  </P>
! B8 Y( q6 e$ ~6 [<P>   SetCommMask(hcom,EV—RXCHAR| EV—TXEMPTY); //设置事件掩码 </P>: z; a  g6 z$ s7 p
<P>  </P>3 M) ~6 W) z( R3 U. P- z7 S
<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-4-20 01:30 , Processed in 0.463394 second(s), 86 queries .

回顶部