QQ登录

只需要一步,快速开始

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

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

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

823

主题

3

听众

4048

积分

我的地盘我做主

该用户从未签到

发帖功臣 元老勋章

跳转到指定楼层
1#
发表于 2005-1-26 13:06 |只看该作者 |倒序浏览
|招呼Ta 关注Ta
<>  </P>
% ]$ _1 M8 _; z: K2 F1 E<>姜滨 </P>
+ `( t0 z& q/ R8 |  e2 Z<>  </P>7 H7 e# G; u- z6 [, b0 Q8 \
<>  ·串口操纵的基本方法· </P>, x1 J# i3 ~1 f+ f
<>  </P>
: M+ l. n+ U' D* P6 G% M/ T, z<>  </P>
7 ~2 c& a+ P1 W% d# I3 A8 d<>  在Win32下,对串口的操作就如同对文件一样打开或关闭,对串行数据的读 </P>
) V! h4 d# P+ Q8 x& U; l7 _* _: w<>写可在用户定义的读写缓冲区中进行。具体使用的函数为: </P># t0 b& v9 a- \3 D
<>  </P>
8 r" ?$ S6 }- j; Q8 m, @2 S<>  首先用CreateFile( )打开通信串口,其中参数lpFileName指向串口逻辑名 </P>
# N  C; s$ h9 N: F( M/ H' E) }<>,如“COM1”或“COM2”等,参数dwDesiredAccess定义文件的读写权限,一般 </P>( V1 \( O" G) k) U, p, G
<>设为GENERIC—READ|GENERIC—WRITE;参数dwShareMode定义资源共享方式,此 </P>
1 }* K9 _7 ~, U# N+ M7 {<>处必须设为0,为独占方式;lpSecurityAttributes定义安全属性,Win 95下为 </P>% D- v9 {2 S5 a, [! l
<>NULL;dwCreationDistribution定义文件创建方式;dwFlagsAndAttributes定义 </P>
6 K8 {/ `3 t, }: R<>文件属性和标记,应设为FILE—FLAG—OVERLAPPED,表示异步通信方式; </P>
* A& ~2 m+ l, T! p+ B" I- c<>hTemplateFile 指向一个模板文件的句柄,在 Windows 95下为NULL。 </P>% k  e4 a6 i2 A2 _1 g
<>  </P>
% W5 f* k" @$ p2 v" O' T! y<>  然后用BuildCommDCB( )和SetCommState( )函数通过通信设备控制块DCB( </P>; `/ \% u( C9 R1 b& V* ~5 d
<>Device Control Block)设置串口通信参数(如波特率、停止位、数据位、校验 </P>5 V+ J6 F2 ?; t! R" f. G% g7 _
<>位等),其中BuildCommDCB( )中的字符串参数lpDef 定义同DOS命令中MODE的参 </P>( [+ `! h4 b; W
<>数格式,关于DCB更具体的设置需要根据用户对数据流定义、握手信号及通信控 </P>5 q6 T& w; Z# a
<>制要求具体定义,参见有关Windows技术资料。用GetCommState()可以得到当前 </P>
# h. L' m: X6 _* S& O* X<>的DCB参数值。如果需要还可通过SetCommTimeouts()和GetCommTomeouts()重新 </P>% j" z6 Z4 r  P) z6 I+ V
<>设置读写的超时参数;读写缓冲区的设置使用SetupComm(),参数dwInQueue和 </P>
  E; x2 Y0 ]0 Q% c<>dwOutQueue分别定义为输入和输出缓冲区的大小。 </P>: j$ R. P4 H5 l+ C4 Y
<>  </P>& t0 b/ m0 r3 N& s& n  @
<>  在串口初始化完毕后,还要建立与通信有关的事件对象。一般使用 </P>: ^. C! l7 k8 ~( Q! d7 i% T# I$ `
<>CreateEvent()函数,它返回一事件句柄,其中参数lpEventAttributes指向安全 </P>& [+ n# J* X3 Y3 ~
<>属性结构地址,在Win 95(无安全属性)中为NULL;布尔参数bManualReset 定 </P>
8 m, S" J1 Z- H7 M1 j, r" r7 X% X<>义事件重置方式,true 表示手工重置,false表示自动重置(相关函数为 </P>
2 q/ ]' ^, ^8 @- ]3 a( \<P>SetEvent()和ResetEvent());参数bInitialState定义事件初始状态,true表 </P>
* W8 S) j) C; _& R9 c, t<P>示发信号,否则为不发信号;lpName是为多进程设置的事件名,对于单进程定义 </P>
+ H  l) ]) O* E<P>为NULL。然后用SetCommMask()定义用户程序可监视的通信事件类别。 </P>, Q: w9 D+ t/ \2 c0 g! \  G
<P>  </P>
& Z! g2 ~/ B7 L<P>  以上设置完成后,用户程序就可以等待通信事件的产生,一般调用函数 </P>
- v9 W" w2 g! s1 q  A  ?3 |<P>WaitCommEvent()监视通信事件,其中参数lpEvtMask指向产生事件的掩码地址, </P>
& J, j; g& x9 j3 w; I8 a<P>用于判断事件产生的性质,lpOverlapped指向重叠结构地址,可简单定义为 </P>: ^0 E% n$ ]0 U
<P>NULL。对于串口事件的响应一般有四种方式:查询、同步I/O、异步I/O和事件驱 </P>5 M$ F& L! ?  m, ~( q
<P>动I/O,需要根据用户不同控制要求而定。查询方式占用较长的计算机时间,同 </P>5 r: [( k6 ~5 S
<P>步I/O方式直到读取完指定的字节数或超时时才返回,容易造成线程阻塞,异步 </P>2 o3 R- a+ m1 ?; a# ^
<P>I/O用于后台处理,事件驱动是由系统通知用户程序发生的事件并进行串口操作 </P>
( O! d" W; N. f$ T0 M: f' j1 i  ~<P>。 比较而言事件驱动I/O方式较灵活。 </P>
! N' _: S2 _5 B3 c- t& \. G<P>  </P>7 u1 y+ G) i" R1 `+ M; o% s  m
<P>  当有通信事件产生时,就可用函数ReadFile()和WriteFile()直接对串口缓 </P>
9 u# q; L- F  n& W& e* L" t; V$ U/ n1 i<P>冲区进行读写操作了。其中lpBuffer 指向读写缓冲区,nNumberOfBytes为要读 </P>  x  P# s' g/ ?: ]
<P>写的字节数,lpNumberOfBytes为实际读写的字节数,lpOverlapped指定同步或 </P>- }& G) j! C+ m  p/ S
<P>异步操作。通信结束后,调用函数CloseHandle()将串口关闭。 </P>: ~# X; t0 a$ |: w- B2 ?; j$ A/ j
<P>  </P>- k- ?: Y8 A# J9 n* J
<P>  ·应用实例说明· </P>5 y1 [* c8 s7 Z( S: Q$ Q- w" {
<P>  </P>
5 H- h0 V/ ]$ F$ ~! t6 Q* @+ @! C/ I<P>  </P>
6 [$ L# w6 L- F& {1 |- R- @<P>  使用以上的API函数,笔者给出了简化后的串口初始化的实例。图1为使用C </P>
+ q0 Y0 W/ X, H8 d" k  c9 }6 m  a<P>++ Builder 组件生成的串口通信基本参数设置的界面实例。 </P>6 u( D. s, ]# `+ l+ Q
<P>  </P>9 s7 q2 F3 x8 X% ^
<P>  HANDLE hcom; //定义句柄 </P>
7 _) Q# m4 Q+ a- P<P>  </P>1 k$ s6 Y- D" i
<P>  DCB dcb; </P>+ F% E( ^! i# U) {" s: V/ Q# D1 H
<P>  </P>
: Q% Z0 z0 q* S  [. V( Y<P>  OVERLAPPED e; //定义重叠结构 </P>
2 X( q1 i/ R  J, ~<P>  </P>
0 y' k2 A- r- w/ B<P>  void —fastcall TForm1::OkBtnClick(TObject?Sender) </P>
  D" \9 U* y. U  K. k" o3 t" n<P>  </P>
* q9 H% |0 j. b# A( f  p. \8 x5 s* a/ R<P>  { hcom=CreateFile("COM2",GENERIC—READ|GENERIC—WRITE,0,NULL,OPEN </P>2 F3 t( U+ o6 S0 ^
<P>—EXISTING, </P>: r& j) g: K- `* G1 y/ K% u6 b
<P>FILE—ATTRIBUTE—NORMAL|FILE—FLAG—OVERLAPPED,NULL); //打开通讯口 </P>
, G0 ?! z7 ^" D9 s* y- A5 ]" g<P>  </P>) E) @! T# Z! g; k- E3 A4 w" p
<P>   BuildCommDCB("9600,O,8,1",&dcb); </P>
" w- X( s2 a- c<P>  </P>  d1 z. l/ F. j  [
<P>//第一个字符串参数实际使用时由图1选择后组合,这里仅简单说明其格式 </P>
, @5 Q" @/ F& d7 V7 @5 V! L/ z<P>  </P>
' x; `  |& T( x) v  @<P>   SetCommState(hcom,&dcb); </P>
9 s) E9 o7 ^  n" m7 x<P>  </P>: J. Y  Z6 X) I6 H
<P>   SetupComm(hcom,512,512);//设置读写缓冲区 </P>5 n; q. k/ n+ X
<P>  </P>
. v' a+ _- J# H4 Q4 I; p, R<P>   e.hEvent=CreateEvent(NULL,false,false,NULL); //设置事件 </P>- H  `8 z0 `$ T$ }3 m9 m
<P>  </P>
. M2 W5 W2 c* L4 D1 T<P>   SetCommMask(hcom,EV—RXCHAR| EV—TXEMPTY); //设置事件掩码 </P>
: e2 {6 e7 y* K7 x6 z6 |6 S<P>  </P>  e' i, d9 _- k7 r% G- G
<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-7-18 06:54 , Processed in 0.486504 second(s), 92 queries .

回顶部