|
用C++ Builder來編寫串行通信程序,我們需要用到幾個Windows API函數(shù)而不像在DOS下那樣直接操作串口和中斷芯片。這幾個函數(shù)有OpenFile、CloseFile,GetCommState、SetCommState等。Microsoft的Visual Basic 中有一個OCX控件MSComm32,在VB中用它做串行通信程序很方便,將它裝入Builder 3中,它的Input和Output屬性是UnKnown,即Builder 3不認(rèn)識MSComm32的這兩個屬性。升級到Borland 的C++ Builder4.0,在Object Inspector中將不再看到這兩個屬性,但它們?nèi)匀淮嬖冢@兩個屬性的類型是OleVariant。使用這種類型方法如下:
在要發(fā)送數(shù)據(jù)時,我們聲明一個發(fā)送數(shù)據(jù)緩沖區(qū),然后重置它的大小,填充它的元素,發(fā)送它,例如:
unsigned char buff[200];//請聲明為全局變量,應(yīng)該是動態(tài)數(shù)組,否則會出現(xiàn)亂碼
OleVariant TxBuff;//聲明一個OleVariant 變量
TxBuff=VarArrayCreate(OPENARRAY(int,(0,200)),varByte);//重置它的大小,為0~n,int 為n的類型。
。痸arByte為TxBuff每一個元素的類型。 for(int i=0;ibr<200+1;i++)TxBuff.PutElement(buff[i],i);
。畛湓,其中buff為你定義的一個固定數(shù)組,其中有你要發(fā)的數(shù)據(jù)。
MSComm1->Output=TxBuff;//發(fā)送數(shù)據(jù),MSComm1為你放在窗體上的一個MSComm32控件。
按收數(shù)據(jù)時請看下面的例子:
unsigned char buff[200];//聲明一個存儲接收數(shù)據(jù)的緩沖區(qū),全局變量
int ByteNum;//收到的字節(jié)數(shù)
int BuffPtr;//接收緩沖區(qū)的指針,請聲明為全局變量,
OleVariant RxBuff;//一個用于接收的OleVariant變量,
if(MSComm1->InBufferCount>0)RxBuff=Communica1->Input;//如果緩沖區(qū)中有多于一個字節(jié)的數(shù)據(jù)
ByteNum=RxBuff.ArrayHighBound(1);//將實際讀的字節(jié)數(shù)取出 for(int i=0;ibr<ByteNum+1;i++) {buff[BuffPtr++]=RxBuff.GetElement(i);}//將接收數(shù)據(jù)讀入自己的緩沖區(qū)>
在Object Inspector的Event標(biāo)簽中只有一個事件OnComm,這個事件在MSComm32控件收到數(shù)據(jù)時會被調(diào)用,但你必須設(shè)置RThreshold屬性。這是一個門檻,表示收到幾個字節(jié)就發(fā)送通知消息,如果為零,就不發(fā)送通知消息,這樣你的OnComm函數(shù)就不會得到執(zhí)行,TThreshold是發(fā)送門檻,不要忘記Settings。
另外值得注意的是MSComm32的OnComm事件不是很準(zhǔn)確,有時候會丟失,你不能過分依賴這個事件,否則,經(jīng)常發(fā)生的不是發(fā)不出數(shù)據(jù),就是接收不到數(shù)據(jù),最好的辦法是使用一個定時控件,需要的時候就去讀MSComm32控件的緩沖區(qū)。 |