单片机学习开发网

用C＋＋ Builder来编写串行通信程序，我们需要用到几个Windows API函数而不像在DOS下那样直接操作串口和中断芯片。这几个函数有OpenFile、CloseFile,GetCommState、SetCommState等。Microsoft的Visual Basic 中有一个OCX控件MSComm32,在VB中用它做串行通信程序很方便，将它装入Builder 3中，它的Input和Output属性是UnKnown，即Builder 3不认识MSComm32的这两个属性。升级到Borland 的C＋＋ Builder4.0，在Object Inspector中将不再看到这两个属性，但它们仍然存在，这两个属性的类型是OleVariant。使用这种类型方法如下：

　　在要发送数据时，我们声明一个发送数据缓冲区,然后重置它的大小，填充它的元素，发送它，例如：

　　unsigned char buff[200];／／请声明为全局变量，应该是动态数组，否则会出现乱码

　　OleVariant TxBuff;／／声明一个OleVariant 变量

　　TxBuff=VarArrayCreate(OPENARRAY(int,(0,200)),varByte);／／重置它的大小，为0～n,int 为n的类型。

　　／／varByte为TxBuff每一个元素的类型。
    for(int i=0;ibr<200＋1;i＋＋)TxBuff.PutElement(buff[i],i);

　　／／填充元素，其中buff为你定义的一个固定数组，其中有你要发的数据。

　　MSComm1－>Output=TxBuff;／／发送数据，MSComm1为你放在窗体上的一个MSComm32控件。

　　按收数据时请看下面的例子：

　　unsigned char buff[200];／／声明一个存储接收数据的缓冲区，全局变量

　　int ByteNum;／／收到的字节数

　　int BuffPtr;／／接收缓冲区的指针，请声明为全局变量，

　　OleVariant RxBuff;／／一个用于接收的OleVariant变量，

　　if(MSComm1－>InBufferCount>0)RxBuff=Communica1－>Input;／／如果缓冲区中有多于一个字节的数据

　　ByteNum=RxBuff.ArrayHighBound(1);／／将实际读的字节数取出
    for(int i=0;ibr<ByteNum＋1;i＋＋)
       {buff[BuffPtr＋＋]=RxBuff.GetElement(i);}／／将接收数据读入自己的缓冲区>

　　在Object Inspector的Event标签中只有一个事件OnComm，这个事件在MSComm32控件收到数据时会被调用，但你必须设置RThreshold属性。这是一个门槛，表示收到几个字节就发送通知消息，如果为零，就不发送通知消息，这样你的OnComm函数就不会得到执行，TThreshold是发送门槛，不要忘记Settings。

　　另外值得注意的是MSComm32的OnComm事件不是很准确，有时候会丢失，你不能过分依赖这个事件，否则，经常发生的不是发不出数据，就是接收不到数据,最好的办法是使用一个定时控件，需要的时候就去读MSComm32控件的缓冲区。

转载自 单片机编程世界