串口調試程序

 

1.建立項目:打開VC++6.0,建立一個基於對話框的MFC應用程序SCommTest(與我源代碼一致,等會你會方便一點);

2.在項目中插入MSComm控件   選擇Project菜單下Add To Project子菜單中的 Components and Controls…選項,在彈出的對話框中雙擊Registered ActiveX Controls項(稍等一會,這個過程較慢),則所有註冊過的ActiveX控件出現在列表框中。 選擇Microsoft Communications Control, version 6.0,,單擊Insert按鈕將它插入到我們的Project中來,接受缺省的選項。(如果你在控件列表中看不到Microsoft Communications Control, version 6.0,那可能是你在安裝VC6時沒有把ActiveX一項選上,重新安裝VC6,選上ActiveX就可以了),

這時在ClassView視窗中就可以看到CMSComm類了,(注意:此類在ClassWizard中看不到,重構clw文件也一樣),並且在控件工具欄Controls中出現了電話圖標(如圖1所示),現在要做的是用鼠標將此圖標拖到對話框中,程序運行後,這個圖標是看不到的。

scomm01.jpg

3.利用ClassWizard定義CMSComm類控制對象  打開ClassWizard->Member Viariables選項卡,選擇CSCommTestDlg類,爲IDC_MSCOMM1添加控制變量:m_ctrlComm,這時你可以看一看,在對話框頭文件中自動加入了//{{AFX_INCLUDES()  #include "mscomm.h"  //}}AFX_INCLUDES (這時運行程序,如果有錯,那就再從頭開始)。

4.在對話框中添加控件  向主對話框中添加兩個編輯框,一個用於接收顯示數據ID爲IDC_EDIT_RXDATA,另一個用於輸入發送數據,ID爲IDC_EDIT_TXDATA,再添加一個按鈕,功能是按一次就把發送編輯框中的內容發送一次,將其ID設爲IDC_BUTTON_MANUALSEND。別忘記了將接收編輯框的Properties->Styles中把Miltiline和Vertical Scroll屬性選上,發送編輯框若你想輸入多行文字,也可選上Miltiline。

再打開ClassWizard->Member Viariables選項卡,選擇CSCommTestDlg類, 爲IDC_EDIT_RXDATA添加CString變量m_strRXData, 爲IDC_EDIT_TXDATA添加CString變量m_strTXData。說明: m_strRXData和m_strTXData分別用來放入接收和發送的字符數據。

       休息一會吧?我們天天與電腦打交道,要注意保重,我現在在單槓上做引體向上可以來40次,可我都32了,佩服嗎?jumpsmile1.gif。。。。。。好了,再接着來,下面是關鍵了:

5.添加串口事件消息處理函數OnComm() 打開ClassWizard->Message Maps,選擇類CSCommTestDlg,選擇IDC_MSCOMM1,雙擊消息OnComm,將彈出的對話框中將函數名改爲OnComm,(好記而已)OK。

 這個函數是用來處理串口消息事件的,如每當串口接收到數據,就會產生一個串口接收數據緩衝區中有字符的消息事件,我們剛纔添加的函數就會執行,我們在OnComm()函數加入相應的處理代碼就能實現自已想要的功能了。請你在函數中加入如下代碼:

void CSCommTestDlg::OnComm() 
{
    // TODO: Add your control notification handler code here
    VARIANT variant_inp;
    COleSafeArray safearray_inp;
    LONG len,k;
    BYTE rxdata[2048]; //設置BYTE數組 An 8-bit integerthat is not signed.
    CString strtemp;
    if(m_ctrlComm.GetCommEvent()==2) //事件值爲2表示接收緩衝區內有字符
    {             ////////以下你可以根據自己的通信協議加入處理代碼
        variant_inp=m_ctrlComm.GetInput(); //讀緩衝區
        safearray_inp=variant_inp; //VARIANT型變量轉換爲ColeSafeArray型變量
        len=safearray_inp.GetOneDimSize(); //得到有效數據長度
        for(k=0;k<len;k++)
            safearray_inp.GetElement(&k,rxdata+k);//轉換爲BYTE型數組
        for(k=0;k<len;k++) //將數組轉換爲Cstring型變量
        {
            BYTE bt=*(char*)(rxdata+k); //字符型
            strtemp.Format("%c",bt); //將字符送入臨時變量strtemp存放
            m_strRXData+=strtemp; //加入接收編輯框對應字符串 
        }
    }
    UpdateData(FALSE); //更新編輯框內容
}

到目前爲止還不能在接收編輯框中看到數據,因爲我們還沒有打開串口,但運行程序不應該有任何錯誤,不然,你肯定哪兒沒看仔細,因爲我是打開VC6對照着做一步寫一行的,運行試試。沒錯吧?那麼做下一步:

6.打開串口和設置串口參數  你可以在你需要的時候打開串口,例如在程序中做一個開始按鈕,在該按鈕的處理函數中打開串口。現在我們在主對話框的CSCommTestDlg::OnInitDialog()打開串口,加入如下代碼:

// TODO: Add extra initialization here
if(m_ctrlComm.GetPortOpen())
m_ctrlComm.SetPortOpen(FALSE);

m_ctrlComm.SetCommPort(1); //選擇com1
if( !m_ctrlComm.GetPortOpen())
m_ctrlComm.SetPortOpen(TRUE);//打開串口
else
AfxMessageBox("cannot open serial port");

m_ctrlComm.SetSettings("9600,n,8,1"); //波特率9600,無校驗,8個數據位,1個停止位

m_ctrlComm.SetInputModel(1); //1:表示以二進制方式檢取數據
m_ctrlComm.SetRThreshold(1); 
//參數1表示每當串口接收緩衝區中有多於或等於1個字符時將引發一個接收數據的OnComm事件
m_ctrlComm.SetInputLen(0); //設置當前接收區數據長度爲0
m_ctrlComm.GetInput();//先預讀緩衝區以清除殘留數據

現在你可以試試程序了,將串口線接好後(不會接?去看看我寫的串口接線基本方法),打開串口調試助手,並將串口設在com2,選上自動發送,也可以等會手動發送。再執行你編寫的程序,接收框裏應該有數據顯示了。

7.發送數據  先爲發送按鈕添加一個單擊消息即BN_CLICKED處理函數,打開ClassWizard->Message Maps,選擇類CSCommTestDlg,選擇IDC_BUTTON_MANUALSEND,雙擊BN_CLICKED添加OnButtonManualsend()函數,並在函數中添加如下代碼:

void CSCommTestDlg::OnButtonManualsend() 
{
// TODO: Add your control notification handler code here
UpdateData(TRUE); //讀取編輯框內容
m_ctrlComm.SetOutput(COleVariant(m_strTXData));//發送數據
}

運行程序,在發送編輯框中隨意輸入點什麼,單擊發送按鈕,啊!看看,在另一端的串口調試助手(或別的調試工具)接收框裏出現了什麼。

如果你真是初次涉獵串口編程,又一次成功,那該說聲謝謝我了,因爲我第一次做串口程序時可費勁了,那時網上的資料也不好找。開開玩笑,謝謝你的支持,有什麼好東西別忘了給我寄一份。

最後說明一下,由於用到VC控件,在沒有安裝VC的計算機上運行時要從VC中把mscomm32.ocx、msvcrt.dll、mfc42.dll拷到Windows目錄下的System子目錄中(win2000爲System32)並再進行註冊設置,請參考

如何手工註冊MSComm控件。

龔建偉 2001.6.20


什麼是VARIANT數據類型?如何使用VARIANT數據類型? 怎麼以十六進制或二進制發送和接收?

8.發送十六進制字符

    在主對話框中加入一個複選接鈕,ID爲IDC_CHECK_HEXSEND Caption: 十六進制發送,再利用ClassWizard爲其添加控制變量:m_ctrlHexSend;

    在ClassView中爲SCommTestDlg類添加以下兩個PUBLIC成員函數,並輸入相應代碼;

 

//由於這個轉換函數的格式限制,在發送框中的十六制字符應該每兩個字符之間插入一個空隔
//如:A1 23 45 0B 00 29
//CByteArray是一個動態字節數組,可參看MSDN幫助
int CSCommTestDlg::String2Hex(CString str, CByteArray &senddata)
{
int hexdata,lowhexdata;
int hexdatalen=0;
int len=str.GetLength();
senddata.SetSize(len/2);
for(int i=0;i<len;)
{
char lstr,hstr=str[i];
if(hstr==' ')
{
i++;
continue;
}
i++;
if(i>=len)
break;
lstr=str[i];
hexdata=ConvertHexChar(hstr);
lowhexdata=ConvertHexChar(lstr);
if((hexdata==16)||(lowhexdata==16))
break;
else 
hexdata=hexdata*16+lowhexdata;
i++;
senddata[hexdatalen]=(char)hexdata;
hexdatalen++;
}
senddata.SetSize(hexdatalen);
return hexdatalen;
}

//這是一個將字符轉換爲相應的十六進制值的函數
//好多C語言書上都可以找到
//功能:若是在0-F之間的字符,則轉換爲相應的十六進制字符,否則返回-1
char CSCommTestDlg::ConvertHexChar(char ch) 
{
if((ch>='0')&&(ch<='9'))
return ch-0x30;
else if((ch>='A')&&(ch<='F'))
return ch-'A'+10;
else if((ch>='a')&&(ch<='f'))
return ch-'a'+10;
else return (-1);
}

 

  再將CSCommTestDlg::OnButtonManualsend()修改成以下形式:

void CSCommTestDlg::OnButtonManualsend() 
{
// TODO: Add your control notification handler code here
UpdateData(TRUE); //讀取編輯框內容
if(m_ctrlHexSend.GetCheck())
{
CByteArray hexdata;
int len=String2Hex(m_strTXData,hexdata); //此處返回的len可以用於計算髮送了多少個十六進制數
m_ctrlComm.SetOutput(COleVariant(hexdata)); //發送十六進制數據
}
else 
m_ctrlComm.SetOutput(COleVariant(m_strTXData));//發送ASCII字符數據

}

現在,你先將串口線接好並打開串口調試助手V2.1,選上以十六制顯示,設置好相應串口,然後運行我們這個程序,在發送框中輸入00 01 02 03 A1 CC等十六進制字符,並選上以十六進制發送,單擊手動發送,在串口調試助手的接收框中應該可以看到00 01 02 03 A1 CC了。

 

jumpsmile1.gif9.在接收框中以十六進制顯示

    這就容易多了:  在主對話框中加入一個複選接鈕,IDC_CHECK_HEXDISPLAY Caption: 十六進制顯示,再利用ClassWizard爲其添加控制變量:m_ctrlHexDiaplay。 然後修改CSCommTestDlg::OnComm()函數:

void CSCommTestDlg::OnComm() 
{
// TODO: Add your control notification handler code here
VARIANT variant_inp;
COleSafeArray safearray_inp;
LONG len,k;
BYTE rxdata[2048]; //設置BYTE數組 An 8-bit integerthat is not signed.
CString strtemp;
if(m_ctrlComm.GetCommEvent()==2) //事件值爲2表示接收緩衝區內有字符
{
variant_inp=m_ctrlComm.GetInput(); //讀緩衝區
safearray_inp=variant_inp; //VARIANT型變量轉換爲ColeSafeArray型變量
len=safearray_inp.GetOneDimSize(); //得到有效數據長度
for(k=0;k<len;k++)
safearray_inp.GetElement(&k,rxdata+k);//轉換爲BYTE型數組
for(k=0;k<len;k++) //將數組轉換爲Cstring型變量
{
BYTE bt=*(char*)(rxdata+k); //字符型
if(m_ctrlHexDisplay.GetCheck())
strtemp.Format("%02X ",bt); //將字符以十六進制方式送入臨時變量strtemp存放,注意這裏加入一個空隔
else 
strtemp.Format("%c",bt); //將字符送入臨時變量strtemp存放

m_strRXData+=strtemp; //加入接收編輯框對應字符串 
}
}
UpdateData(FALSE); //更新編輯框內容
}

測試:在串口調試助手發送框中輸入00 01 02 03 A1 CC等十六進制字符,並選上以十六進制發送,單擊手動發送,在本程序運行後選上以十六進制顯示,在串口調試助手中單擊手動發送或自動發送,則在本程序的接收框中應該可以看到00 01 02 03 A1 CC了。

 

jumpsmile1.gif10.如何設置自動發送

     最簡單的設定自動發送週期是用SetTimer()函數,這在數據採集中很有用,在控制中指令的傳送也可能用到定時發送。

    方法是:在ClassWizard中選上MessageMap卡,然後在Objects IDs選中CSCommTestDlg類,再在Messages框中選上WM_TIMER消息,單擊ADD_FUNCTION加入void CSCommTestDlg::OnTimer(UINT nIDEvent) 函數,這個函數是放入“時間到”後要處理的代碼:

void CSCommTestDlg::OnTimer(UINT nIDEvent) 
{
// TODO: Add your message handler code here and/or call default
OnButtonManualsend();
CDialog::OnTimer(nIDEvent);
}

再在在主對話框中加入一個複選接鈕,ID爲IDC_CHECK_AUTOSEND Caption: 自動發送(週期1秒),再利用ClassWizard爲其添加BN_CLICK消息處理函數void CSCommTestDlg::OnCheckAutosend():

void CSCommTestDlg::OnCheckAutosend() 
{
// TODO: Add your control notification handler code here
m_bAutoSend=!m_bAutoSend;
if(m_bAutoSend)
{
SetTimer(1,1000,NULL);//時間爲1000毫秒
}
else
{
KillTimer(1);  //取消定時
}
}

其中:m_bAutoSend爲BOOL型變量,在CLASSVIEW中爲CSCommTestDlg類加入,並在構造函數中初始化:

      m_bAutoSen=FALSE;
現在可以運行程序測試了。

 

jumpsmile1.gif11.什麼是VARIANT數據類型?如何使用VARIANT數據類型?

     不知如何使用VARIANT數據類型, 有不少朋友對VARIANT這個新的數據類型大感頭疼。SetOutput()函數中 需要的VARIANT參數還可以使用COleVariant類的構造函數簡單生成,現在GetInput()函數的返回值也成了VARIANT類型,那麼如何從返回的值中提取有用的內容。 VARIANT及由之而派生出的COleVariant類主要用於在OLE自動化中傳遞數據。實際上VARIANT也只不過是一個新定義的結構罷了,它的主要成員包括一個聯合體及一個變量。該聯合體由各種類型的數據成員構成, 而該變量則用來指明聯合體中目前起作用的數據類型。我們所關心的接收到的數據就存儲在該聯合體的某個數據成員中。 該聯合體中包含的數據類型很多,從一些簡單的變量到非常複雜的數組和指針。由於通過串口接收到的內容常常是一個字節串,我們將使用其中的某個數組或指針來訪問接收到的數據。這裏推薦給大家的是指向一個SAFEARRAY(COleSafeArray)類型變量。新的數據類型SAFEARRAY正如其名字一樣,是一個“安全數組”,它能根據系統環境自動調整其16位或32 位的定義,並且不會被OLE改變(某些類型如BSTR在16位或32位應用程序間傳遞時會被OLE翻譯從而破壞其中的二進制數據)。大家無須瞭解SAFEARRAY的具體定義,只要知道它是另外一個結構,其中包含一個 (void *)類型的指針pvData,其指向的內存就是存放有用數據的地方。 簡而言之,從GetInput()函數返回的VARIANT類型變量中,找出parray 指針,再從該指針指向的SAFEARRAY變量中找出pvData指針,就可以向訪問數組一樣取得所接收到的數據了。具體應用請參見void CSCommTestDlg::OnComm()函數。

發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章