• <ruby id="5koa6"></ruby>
    <ruby id="5koa6"><option id="5koa6"><thead id="5koa6"></thead></option></ruby>

    <progress id="5koa6"></progress>

  • <strong id="5koa6"></strong>
  • 用Pcomm Pro 開發串行通信程序

    發表于:2007-07-04來源:作者:點擊數: 標簽:
    華東交通大學 任永偉 黃海云 用C ++Builder 在Win9x 下 開發 串行通信程序是 程序員 們經常遇到卻又令人頭痛的事情,不但要理解許多復雜的API 函數,還要掌握多線程編程。令人欣慰的是有一些公司專門為C ++Builder 開發了編寫串行通信程序的開發工具,例
    華東交通大學 任永偉 黃海云

      用C ++Builder 在Win9x 下開發串行通信程序是程序員們經常遇到卻又令人頭痛的事情,不但要理解許多復雜的API 函數,還要掌握多線程編程。令人欣慰的是有一些公司專門為C ++Builder 開發了編寫串行通信程序的開發工具,例如MOXA 公司的Pcomm(該軟件可在http:\\www.moxa.com.tw 下載),因而幫我們解決了串行編程這一難題。

      下面結合一個具體的例子來說明串行通信程序的開發。本程序的編程環境是Win98 和C ++Builder3.0。這個編程示例的功能比較強,它具有發送數據和自動接收數據的雙重功能。在它的基礎上稍加修改,即可以讓用戶選定進行傳輸的通信端口,并設定這個端口的相關參數,包括波特率、數據位、停止位、奇偶校驗和流量控制等。

      一、Pcomm 的設置

      啟動C ++Builder3.0,點擊File/New Application,建立一個項目文件,修改表單的Name 屬性為Comm, 然后存盤,命名項目(Project)為CommTest,命名單元(Unit) 為Comm。
      Pcomm Library 是一個動態連接庫(DLL)文件,當使用C ++Builder 編譯器編譯PComm.dll 庫時,我們必須告訴C ++Builder 的編譯器怎樣找到這些函數(sio_xxx())。

      因此我們用PComm Pro 在Borland C ++Builder 中開發一個串行程序時,必須做到以下兩點:

    假如你的Pcomm Pro 是安裝在c:\Program files(缺省安裝目錄)目錄下,把c:\Program files \ Pcomm Pro \ Lib 下的Pcommb.lib 文件加入到C ++Builder 的View 菜單中Project Manager 的項目中,使之成為項目的一個單元(unit)。
    把#include "c:\Program files\PcommPro\Lib\PComm.h" 包含在你的Comm.cpp 中。

      二、表單及屬性的設置

      如圖1 中表單所示:
    http://www.kjueaiud.com/uploads/2007/07/1_200707042009046.jpg (29080 字節)
      依照圖1 中主界面來添加控件,并依照表1 中的設置來設置各控件的Name 和Caption 屬性。
    http://www.kjueaiud.com/uploads/2007/07/1_200707042009047.jpg (22622 字節)
      該通信程序的工作原理為中斷方式,即當輸入緩存內有數據時,就會觸發Pcomm 的中斷函數sio_cnt_irq (Port, *CntIrq, count),再由它啟動中斷服務程序CntIrq(),然后由數據接收函數sio_read (port, ibuf, len) 來接收數據并做其他相應的處理;至于函數Open ()、Sent ()、Close () 則分別為打開按鈕、發送按鈕、關閉按鈕的click 事件函數;SendData、ReceiveData 分別為發送數據編輯框和接收數據編輯框相對應的字符串變量。

      三、主程序的編制

      雙擊表單上的Button 控件,就會產生相應的事件,如雙擊" 打開" 按鈕,就會產生Open()事件函數。在這些函數中添加代碼,以及Pcomm Pro 的串行控制函數,就能實現對串口事件的處理。其中一個需要注意的問題是SendData 和ReceiveData 都為AnsiString 字符串,而Pcomm Pro 的函數所需發送和接收的字符串都為char 型,因此要正確使用Pcomm 函數,還要注意字符串轉換。AnsiString 字符串可通過c_str() 函數轉換為char 型,而char 行字符串轉換為AnsiString 則比較簡單??捎肁nsiString(char)把char 型強制轉換為AnsiString 型。程序主要代碼如下所示:
    void __fastcall TComm::Open (TObject *Sender) 
      // 串口打開函數
    {
     int i;
     sio_open (port);   // 打開串口
     sio_ioctl (port, B2400, P_NONE | BIT_7 | STOP_1 );
      // 設置串口參數
     // 包括波特率、數據位、停止位、奇偶校驗
     void __stdcall ( *p)(int);
     p=cntirq;
     i=sio_cnt_irq(port, *p,1);// 設置中斷函數
    }
    // -----?。?br> void __fastcall TComm::Sent (TObject *Sender)
      // 數據發送函數
    {
    char *SendData=new char[20];
    SendData=SentEdit ->Text.c_str();  
    // 把SendEdit 中的AnsiString 型字
       符串轉換為char 型
    sio_write(port,SendData,20);     // 發送數據
    }
    // -----------------
    void __fastcall TComm::Close (TObject *Sender) 
     // 串口關閉函數
    {
    sio_close (port);  // 關閉串口
    }
    // -----------------
    void __stdcall cntirq(int port)
    // 中斷服務函數( 手工生成函數)
    {
    char ibuf[20];       
    AnsiString ReceiveData[20];   
    sio_read (port,ibuf, 20);  // 接收數據
    ReceiveData = Ansistring(ibuf);
    //char 字符串轉換AnsiString 型字符串
    ReceiveEdit ->Text=ReceiveData;
    // 顯示接受到的字符串
    }
      在程序中,我們使用了一些sio_xxx() 型的函數,它們都是Pcomm pro 自帶的串行通信函數(函數的具體用法可以參考Pcomm pro 的幫助),通過這些函數,我們可以對串行端口進行設置。

      sio_open(port) 和sio_close(port) 為打開串口和關閉串口函數,參數port 可設置具體操作的串口;sio_ ioctl(int port, int baud, int mode) 為串口控制函數,可設置串口的波特率、數據位、停止位、奇偶校驗;至于sio_write(port) 和sio_read(port),則為讀串口和寫串口函數;sio_cnt_irq(int port,VOID (CALLBACK *func)(int port), int count) 為中斷函數,當串口有數據時,就觸發該函數,然后該函數就會啟動其中斷服務程序VOID (CALLBACK *func)(int port)(為一函數指針),這里是調用cntirq() 函數接收數據,該函數需要程序員手工生成。

      由此我們可以看出,只要我們對程序稍加修改,在表單上再添加一些控件,使得sio_xxx() 這些函數的參數可以由用戶界面輸入,就可以做到由用戶選定進行數據傳輸的通信端口,并設定這個端口的相關參數,包括波特率、數據位、停止位、奇偶校驗和流量控制等?! ?/p>

    原文轉自:http://www.kjueaiud.com

    老湿亚洲永久精品ww47香蕉图片_日韩欧美中文字幕北美法律_国产AV永久无码天堂影院_久久婷婷综合色丁香五月

  • <ruby id="5koa6"></ruby>
    <ruby id="5koa6"><option id="5koa6"><thead id="5koa6"></thead></option></ruby>

    <progress id="5koa6"></progress>

  • <strong id="5koa6"></strong>