|
用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.ArrayHighBound(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控件的緩沖區。 |
66821730(技術支持)
