用C++ Builder编程实现串行通信

刘纪锋
1999年 第43期 13版


　　用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，也就是Ole万能变量，使用这种类型方法如下：
　　在要发送数据时，我们声明一个发送数据缓冲区，然后重置它的大小，填充它的元素，发送它，例如：
　　buff[200]；／／请声明为全局变量
　　OleVariant TxBuff；／／声明一个OleVariant 变量
　　TxBuff=VarArrayCreate（OPENARRAY（int，（0，n）），varByte）；／／重置它的大小，为0～n，int 为n的类型。 
　　／／varByte为TxBuff每一个元素的类型。
    for（int i=0；i<n＋1；i＋＋）TxBuff.PutElement（buff[i]，i）
    ／／填充元素，其中buff为你定义的一个固定数组，其中有你要发的数据。
　　MSComm1－>Output=TxBuff；／／发送数据，MSComm1为你放在窗体上的一个MSComm32控件。
　　按收数据时请看下面的例子：
　　int 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；i<ByteNum＋1；i＋＋）{buff[BuffPtr＋＋]=RxBuff.GetElement（i）；}／／将接收数据读入自己的缓冲区
　　在Object Inspector的Event标签中只有一个事件OnComm，这个事件在MSComm32控件收到数据时会被调用，但你必须设置RThreshold属性。这是一个门槛，表示收到几个字节就发送通知消息，如果为零，就不发送通知消息，这样你的OnComm函数就不会得到执行，TThreshold是发送门槛，不要忘记Settings。
　　另外值得注意的是MSComm32的OnComm事件不是很准确，有时候会丢失，你不能过分依赖这个事件，否则，经常发生的不是发不出数据，就是接收不到数据，最好的办法是使用一个定时控件，需要的时候就去读MSComm32控件的缓冲区。


 