📄 20000726003.htm
字号:
<HTML>
<HEAD>
<TITLE>用C++ Builder编程实现串行通信</TITLE>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
</HEAD>
<BODY aLink=#FF0000 bgColor=#ffffff leftMargin=0 link=#187800 topMargin=0
vLink=#990099>
<div align="center">
<table width="744" border="0" cellspacing="0" cellpadding="0" height="76">
<tr>
<td>
<p align="center"><b><br>
<font size="3">用C++ Builder编程实现串行通信</font></b></p>
<p align="center"> (武汉 刘纪锋)</p>
<p align="left"> 用C++ Builder来编写串行通信程序, 我们需要用到几个Windows API函数,而不象在DOS
下那样直接操作串口和中断芯片.这几个函数有OpenFile, CloseFile, GetCommState, SetCommState等,Microsoft的Visual
Basic中有一个OCX控件MSComm32,在VB用它做串 行通信设备很方便, 将它装入Builder 3中, 它的Input和Ouput属性是Unknown,
即 Builder 3不认识MSComm32的这两个属性, 我们升级到Borland的C++ Builder 4.0,在 Object
Inspector中将不再看到这两个属性, 但它们仍然存在, 这两个属性的类型是 OleVariant,也就是Ole万能变量,使用这种类型的方法如下:</p>
<p align="left">在要发送数据时,我们声明一个发送数据缓冲区,然后重置它的大小,填充它的元 素,发送它,例如:</p>
<div align="left">
<p><xmp> buff[200];//请声明为全局变量</xmp><br>
<xmp> OleVariant TxBuff;//声明一个OleVariant变量 Txbuff=VarArrayCreat(OPENARRAY(int,(0,n)),varByte);//重置它的大小,为0~n,int
为n的类型。 //varByte为TxBuff每一个元素的类型。 <br>
for(int i=0;i<n=1;i++)<br>
</xmp><xmp>Txbuff.PutElement(buf[i],i); //填充元素其中buff为你定义的一个固定数组,其中有你要发的数据
<br>
MsComm1->Output=TxBuff;//发送数据,MSComm1为你方在窗体上的一个MSComm32控件。</xmp></p>
<p><xmp>接收数据时请看下面的例子: </xmp></p>
<p><xmp>int buff[200];//声明一个存储接收数据的缓冲区,全局变量<br>
</xmp><xmp>int ByteNum;//收到的字节数 int BuffPtr;//接收缓冲区的指针,请声明为全局变量, OleVariant
RxBuff;//一个用于接收的OleVariant变量。 <br>
if(MSComm1-> InBuffCount>0)RxBuff=Communica1->Input;//如果缓冲区有多于一个字节的数据
ByteNum=RxBuff.ArrayHighBound(1);//将实际读的字节数取出 <br>
for(int i=0;i<=ByteNum;i++)<br>
{ </xmp><xmp>buff[BuffPtr++]=RxBuff.GetElement(i);}//将接收数据读入自己的缓冲区。</xmp></p>
</div>
<p align="left">在Object Inspector的Event标签中只有一个事件OnComm, 这个事件在MSComm32控件接收到数据时会被调用,但你必须设置TThreshold属性,这是一个门槛,表示收到几
个字节就发送通知消息,如果为零,就不发送通知消息,这样你的OnComm函数就不会得 到执行,TThreshold是发送门槛,不要忘记Setting。</p>
<p align="left">另外值得注意的是MSComm32的OnComm事件不是很准确,有时会丢失,你不能过分依 赖这个事件,否则,经常发生的不是发不出数据,就是接收不到数据,最好的办法是使
用一个定时控件,需要的时候就区读MSComm32控件的缓冲区。
<p align="left">
</td>
</tr>
</table>
</div>
</BODY></HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -