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

韩冰

<>  </P>
* k3 v( A" F" y4 n0 ^  A" Q% v<>姜滨 </P>
, M: ]% q/ m. |7 |: M; T; H<>  </P>
<>　　·串口操纵的基本方法· </P>
<>  </P>
<>  </P>
<>　　在Win32下，对串口的操作就如同对文件一样打开或关闭，对串行数据的读 </P>
<>写可在用户定义的读写缓冲区中进行。具体使用的函数为： </P>
<>  </P>
<>　　首先用CreateFile( )打开通信串口，其中参数lpFileName指向串口逻辑名 </P>
<>，如“COM1”或“COM2”等，参数dwDesiredAccess定义文件的读写权限，一般 </P>
<>设为GENERIC—READ|GENERIC—WRITE；参数dwShareMode定义资源共享方式，此 </P>
<>处必须设为0，为独占方式；lpSecurityAttributes定义安全属性，Win 95下为 </P>
  `+ m4 B: X2 I: N4 f  @<>NULL；dwCreationDistribution定义文件创建方式；dwFlagsAndAttributes定义 </P>
<>文件属性和标记，应设为FILE—FLAG—OVERLAPPED，表示异步通信方式； </P>
. F( Y( V3 v# f) a* @<>hTemplateFile 指向一个模板文件的句柄，在 Windows 95下为NULL。 </P>
1 `5 u* ~+ @8 Z<>  </P>
<>　　然后用BuildCommDCB( )和SetCommState( )函数通过通信设备控制块DCB（ </P>
<>Device Control Block）设置串口通信参数(如波特率、停止位、数据位、校验 </P>
" D; [( K' f# l<>位等)，其中BuildCommDCB( )中的字符串参数lpDef 定义同DOS命令中MODE的参 </P>
<>数格式，关于DCB更具体的设置需要根据用户对数据流定义、握手信号及通信控 </P>
9 K2 I7 O( C' j& O1 L3 N# W<>制要求具体定义，参见有关Windows技术资料。用GetCommState()可以得到当前 </P>
& C  F0 g, k4 l: b1 G<>的DCB参数值。如果需要还可通过SetCommTimeouts()和GetCommTomeouts()重新 </P>
5 c6 F7 _3 ?# i# {$ ~' R& B<>设置读写的超时参数；读写缓冲区的设置使用SetupComm()，参数dwInQueue和 </P>
5 j4 f5 N& C% _( a' ]<>dwOutQueue分别定义为输入和输出缓冲区的大小。 </P>
0 U" a: s$ c' K4 P, l, h<>  </P>
. N, t; G2 N* R' t<>　　在串口初始化完毕后，还要建立与通信有关的事件对象。一般使用 </P>
<>CreateEvent()函数，它返回一事件句柄，其中参数lpEventAttributes指向安全 </P>
<>属性结构地址，在Win 95（无安全属性）中为NULL；布尔参数bManualReset 定 </P>
" _; V2 {( A  Q* o4 Q& {<>义事件重置方式，true 表示手工重置，false表示自动重置（相关函数为 </P>
8 f) d3 L$ e2 S<P>SetEvent()和ResetEvent()）；参数bInitialState定义事件初始状态，true表 </P>
$ J1 q0 U* {) T3 X<P>示发信号，否则为不发信号；lpName是为多进程设置的事件名，对于单进程定义 </P>
" Y8 K. S6 Y9 n<P>为NULL。然后用SetCommMask()定义用户程序可监视的通信事件类别。 </P>
* E, t/ v- s; c  |$ L<P>  </P>
<P>　　以上设置完成后，用户程序就可以等待通信事件的产生，一般调用函数 </P>
% V0 r/ c) f9 A  [4 Q8 _2 {<P>WaitCommEvent()监视通信事件，其中参数lpEvtMask指向产生事件的掩码地址， </P>
) Q1 l5 W- q$ `; G2 |& E<P>用于判断事件产生的性质，lpOverlapped指向重叠结构地址，可简单定义为 </P>
# N. \. k* \, O<P>NULL。对于串口事件的响应一般有四种方式：查询、同步I/O、异步I/O和事件驱 </P>
, v( C# q4 m7 X2 }- Y* v% \% y<P>动I/O，需要根据用户不同控制要求而定。查询方式占用较长的计算机时间，同 </P>
: y6 f0 ]6 E- E2 A* a% J<P>步I/O方式直到读取完指定的字节数或超时时才返回，容易造成线程阻塞，异步 </P>
/ s) l: t+ {, ~<P>I/O用于后台处理，事件驱动是由系统通知用户程序发生的事件并进行串口操作 </P>
<P>。 比较而言事件驱动I/O方式较灵活。 </P>
! O2 y' f* r* c) b5 l" a7 a( J2 n<P>  </P>
<P>　　当有通信事件产生时，就可用函数ReadFile()和WriteFile()直接对串口缓 </P>
<P>冲区进行读写操作了。其中lpBuffer 指向读写缓冲区，nNumberOfBytes为要读 </P>
: q# ^; f* N& G; b7 l, U<P>写的字节数，lpNumberOfBytes为实际读写的字节数，lpOverlapped指定同步或 </P>
<P>异步操作。通信结束后，调用函数CloseHandle()将串口关闭。 </P>
# M" \) P2 z8 R; A5 w<P>  </P>
+ ]' s( a0 ]; ]8 `1 x<P>　　·应用实例说明· </P>
<P>  </P>
; `+ d8 _: v& f) c7 D<P>  </P>
) y3 U0 B1 V- T$ Q4 d# j<P>　　使用以上的API函数，笔者给出了简化后的串口初始化的实例。图1为使用C </P>
9 W* U' H) U9 y' |. F- c<P>＋＋ Builder 组件生成的串口通信基本参数设置的界面实例。 </P>
8 }$ O3 z2 L! R: p" D3 s<P>  </P>
<P>　　HANDLE hcom; //定义句柄 </P>
* v) t5 C- }& {3 n: W5 L<P>  </P>
<P>　　DCB dcb; </P>
- g( W( z1 v0 v5 j0 N<P>  </P>
1 F5 g9 U" z! [4 U; S4 x<P>　　OVERLAPPED e; //定义重叠结构 </P>
. @- q6 \5 R( S! E/ `: C7 Y; m) z<P>  </P>
: W4 D, d6 x' p1 K" J<P>　　void —fastcall TForm1::OkBtnClick(TObject?Sender) </P>
* e7 j9 b- t1 s) J8 c8 e$ ?, r<P>  </P>
9 s1 ^# [3 W4 ~& R3 N<P>　　{ hcom=CreateFile("COM2",GENERIC—READ|GENERIC—WRITE,0,NULL,OPEN </P>
: f- b+ w! {" |9 l+ Y1 N4 i- H6 s& h5 k<P>—EXISTING, </P>
& T$ b7 u4 i3 K! l5 n: M1 A; N3 b<P>FILE—ATTRIBUTE—NORMAL|FILE—FLAG—OVERLAPPED,NULL); //打开通讯口 </P>
# ^& }9 ~! y" }6 W% k% s9 |% U* m<P>  </P>
<P>　　 BuildCommDCB("9600,O,8,1",＆dcb); </P>
9 A: A( N7 h; X+ F. [+ ?<P>  </P>
<P>//第一个字符串参数实际使用时由图1选择后组合，这里仅简单说明其格式 </P>
5 }6 V9 ^+ y7 u# c" l2 x2 f2 r<P>  </P>
' h. O! m+ P8 T4 L6 B0 ~( z* Z* V& B<P>　　 SetCommState(hcom,＆dcb); </P>
; S8 R4 r8 y% q/ w& @" v! N( {<P>  </P>
1 @- K, G( Y+ t5 d' F0 j$ v<P>　　 SetupComm(hcom,512,512);//设置读写缓冲区 </P>
& `2 B* h/ G4 d" Y- }" Y4 w, p<P>  </P>
<P>　　 e.hEvent=CreateEvent(NULL,false,false,NULL); //设置事件 </P>
<P>  </P>
<P>　　 SetCommMask(hcom,EV—RXCHAR| EV—TXEMPTY); //设置事件掩码 </P>
<P>  </P>
<P>　　 OkBtn－〉Enabled=false;} </P>

cjplove

<>强啊,顶</P>

cjplove

<>不错呢</P>

lhc_mike

又是转的吧？

xtmlj

好

ai8815

这个程序看着怎么有点怪呢

ai8815

我用VB编过，好像是比c build简单呢   个人觉得