主頁 > 軟體工程 > mscomm控制元件接收資料問題

mscomm控制元件接收資料問題

2020-09-17 12:03:02 軟體工程

本人用vs編了一個mscomm串口通信程式,正常的收發都可以,接收文本的編輯框關聯了CString變數,我現在要求實作mscomm1.setoutput()發送一條指令后,下位機自動會回復一條資訊(下位機自己發的),接收到資料并改變CString變數然后才能處理,現在編輯框能收到回復的指令,但是CString的值卻不會變化。。。。
另外,我發送完一條mscomm1.setoutput(),下位機會自動回復一條資訊,此時是直接進入OnCommMscomm1()接識訓呼函式嗎?求指教。。。。。。

uj5u.com熱心網友回復:

你可以在OnCommMscomm1()設定斷點,看回傳的是什么值呀

uj5u.com熱心網友回復:


void CUseMsComm32OCXDlg::OnMscomm() 
{
// TODO: Add your control notification handler code here
CString strEvent, strError;
CString str;
short evt=m_MyMSComm.GetCommEvent();
switch(evt)
{ //Events
    case ComEvSend:    // There are SThreshold number of characters in the transmit buffer.
strEvent="Sending";
break;
    case ComEvReceive: // Received RThreshold number of chars.
{
// strEvent="Receiving";
VARIANT var;
var=m_MyMSComm.GetInput();
//
if(m_MyMSComm.GetInputMode()==ComInputModeText) 
{// ComInputModeText
str=var.bstrVal;
}
else
{// ComInputModeBinary, although Text !
COleSafeArray arr;
arr=var;
long len=arr.GetOneDimSize();
BYTE Data[4096];
Data[len]=0;// sz
for(long jj=0;jj < len;jj++)
{
arr.GetElement(&jj, &Data[jj]);
}
// if true binary, we should convert the Data to string 
char *newStr=0;
newStr=(char*)KillHalfHZ(Data,len);// no sz !
str=Data;
}
ShowData(str);
break;
}
    case ComEvCTS:     // Change in the CTS line.
// strEvent="CTS changed";
break;
    case ComEvDSR:     // Change in the DSR line.
strEvent="DSR changed";
break;
    case ComEvCD:      // Change in the CD line.
// strEvent="CDC changed";
break;
    case ComEvRing:    // Change in the Ring Indicator.
strEvent="Phone Ring";
break;
    case ComEvEOF:     // An EOF charater was found in the input stream
strEvent="EOF detected";
break;
// Errors
case ComEventBreak:    // A Break was received.
strError="Break Received";
break;
case 1002: // vbMSCommErCTSTO:
strError="CTS Timeout";
break;
case 1003: // vbMSCommErDSRTO:
strError="DSR Timeout";
break;
case ComEventFrame:    // Framing Error
strError="Framing Error";
break;
case ComEventOverrun:  // Data Lost.
strError="Overrun Error";
break;
case 1007: // vbMSCommErCDTO:
strError="CD TimeOut";
break;
case ComEventRxOver:   // Receive buffer overflow.
strError="R buffer Overflow";
break;
case ComEventRxParity: // Parity Error.
strError="Parity Error";
break;
case ComEventTxFull:   // Transmit buffer full.
strError="T buf Full";
break;
case ComEventDCB:      // Unexpected error retrieving DCB
strError="DCB error";
break;
}
//
if (!strEvent.IsEmpty())
{
AfxMessageBox(strEvent);
}
if (!strError.IsEmpty())
{
AfxMessageBox("ComError", MB_ICONEXCLAMATION);
m_MyMSComm.SetPortOpen(FALSE);
}
}

.cpp
BEGIN_EVENTSINK_MAP(CUseMsComm32OCXDlg, CDialog)
    //{{AFX_EVENTSINK_MAP(CUseMsComm32OCXDlg)
ON_EVENT(CUseMsComm32OCXDlg, IDC_MSCOMM1, 1 /* OnComm */, OnMscomm, VTS_NONE)
//}}AFX_EVENTSINK_MAP
END_EVENTSINK_MAP()
.h
afx_msg void OnMscomm();

void CUseMsComm32OCXDlg::ShowData(LPCTSTR pchData)
{
CString str;
int nCharIndex;
int nBackcount = 0;

// Make sure existing text doesn't get too large.
int len = m_Edit.GetWindowTextLength();
if (len >= 16384)
{
m_Edit.GetWindowText(str);
m_Edit.SetWindowText(str.GetBuffer(len)+4097);
len -= 4097;
}
// Handle backspace characters.
str = pchData;
while ((nCharIndex = str.Find(TCHAR(VK_BACK))) != -1)
{
if (nCharIndex == 0)
{
nBackcount++;
str = str.Mid(nCharIndex+1);
}
else
{
str = str.Left(nCharIndex-1) + str.Mid(nCharIndex+1);
}
}
// Set text insertion point according to number of backspaces
// at the begining of strData.
if (nBackcount>len) nBackcount = len;
m_Edit.SetSel(len-nBackcount,len);
// Eliminate line feeds.
while ((nCharIndex = str.Find(TCHAR('\n'))) != -1)
{// delete all 0Ah
str = str.Left(nCharIndex) + str.Mid(nCharIndex + 1);
}
// Ensure all carriage returns have a line feed following.
LPCTSTR pchStart = (LPCTSTR)str;
LPTSTR pchIndex = _tcschr(pchStart,(TCHAR)'\r');

while (pchIndex != NULL)
{// add 
int nPos = pchIndex - pchStart;
str = str.Left(nPos+1) + CString('\n') + str.Mid(nPos+1);
// Above operation probably allocated a new string buffer.
pchStart = (LPCTSTR)str;
pchIndex = _tcschr(pchStart + nPos + 1,(TCHAR)'\r');
}
// Add filtered data to edit control.
m_Edit.ReplaceSel(str);
}

uj5u.com熱心網友回復:

https://wenku.baidu.com/view/4de60424dd36a32d7375815a.html

uj5u.com熱心網友回復:

這個要看你通訊設定了,默認的好像是系統只要接收到一個字符就會進回呼。但是這樣同時會帶來另外一個問題,就是當對方發送資料稍微長一點時,你這邊可能會分批接收。

uj5u.com熱心網友回復:

參考《編譯原理》中的詞法分析和有限狀態自動機。

uj5u.com熱心網友回復:

謝謝大家 已經解決了

轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/65448.html

標籤:基礎類

上一篇:如何確定另一個行程是否回應了本行程發送的訊息?

下一篇:為什么CImage::Save保存的檔案是0位元組空檔案

標籤雲
其他(157675) Python(38076) JavaScript(25376) Java(17977) C(15215) 區塊鏈(8255) C#(7972) AI(7469) 爪哇(7425) MySQL(7132) html(6777) 基礎類(6313) sql(6102) 熊猫(6058) PHP(5869) 数组(5741) R(5409) Linux(5327) 反应(5209) 腳本語言(PerlPython)(5129) 非技術區(4971) Android(4554) 数据框(4311) css(4259) 节点.js(4032) C語言(3288) json(3245) 列表(3129) 扑(3119) C++語言(3117) 安卓(2998) 打字稿(2995) VBA(2789) Java相關(2746) 疑難問題(2699) 细绳(2522) 單片機工控(2479) iOS(2429) ASP.NET(2402) MongoDB(2323) 麻木的(2285) 正则表达式(2254) 字典(2211) 循环(2198) 迅速(2185) 擅长(2169) 镖(2155) 功能(1967) .NET技术(1958) Web開發(1951) python-3.x(1918) HtmlCss(1915) 弹簧靴(1913) C++(1909) xml(1889) PostgreSQL(1872) .NETCore(1853) 谷歌表格(1846) Unity3D(1843) for循环(1842)

熱門瀏覽
  • Git本地庫既關聯GitHub又關聯Gitee

    創建代碼倉庫 使用gitee舉例(github和gitee差不多) 1.在gitee右上角點擊+,選擇新建倉庫 ? 2.選擇填寫倉庫資訊,然后進行創建 ? 3.服務端已經準備好了,本地開始作準備 (1)Git 全域設定 git config --global user.name "成鈺" git c ......

    uj5u.com 2020-09-10 05:04:14 more
  • CODING DevOps 代碼質量實戰系列第二課,相約周三

    隨著 ToB(企業服務)的興起和 ToC(消費互聯網)產品進入成熟期,線上故障帶來的損失越來越大,代碼質量越來越重要,而「質量內建」正是 DevOps 核心理念之一。**《DevOps 代碼質量實戰(PHP 版)》**為 CODING DevOps 代碼質量實戰系列的第二課,同時也是本系列的 PHP ......

    uj5u.com 2020-09-10 05:07:43 more
  • 推薦Scrum書籍

    推薦Scrum書籍 直接上干貨,推薦書籍清單如下(推薦有順序的哦) Scrum指南 Scrum精髓 Scrum敏捷軟體開發 Scrum捷徑 硝煙中的Scrum和XP : 我們如何實施Scrum 敏捷軟體開發:Scrum實戰指南 Scrum要素 大規模Scrum:大規模敏捷組織的設計 用戶故事地圖 用 ......

    uj5u.com 2020-09-10 05:07:45 more
  • CODING DevOps 代碼質量實戰系列最后一課,周四發車

    隨著 ToB(企業服務)的興起和 ToC(消費互聯網)產品進入成熟期,線上故障帶來的損失越來越大,代碼質量越來越重要,而「質量內建」正是 DevOps 核心理念之一。 **《DevOps 代碼質量實戰(Java 版)》**為 CODING DevOps 代碼質量實戰系列的最后一課,同時也是本系列的 ......

    uj5u.com 2020-09-10 05:07:52 more
  • 敏捷軟體工程實踐書籍

    Scrum轉型想要做好,第一步先了解并真正落實Scrum,那么我推薦的Scrum書籍是要看懂并實踐的。第二步是團隊的工程實踐要做扎實。 下面推薦工程實踐書單: 重構:改善既有代碼的設計 決議極限編程 : 擁抱變化 代碼整潔代碼 程式員的職業素養 修改代碼的藝術 撰寫可讀代碼的藝術 測驗驅動開發 : ......

    uj5u.com 2020-09-10 05:07:55 more
  • Jenkins+svn+nginx實作windows環境自動部署vue前端專案

    前面文章介紹了Jenkins+svn+tomcat實作自動化部署,現在終于有空抽時間出來寫下Jenkins+svn+nginx實作自動部署vue前端專案。 jenkins的安裝和配置已經在前面文章進行介紹,下面介紹實作vue前端專案需要進行的哪些額外的步驟。 注意:在安裝jenkins和nginx的 ......

    uj5u.com 2020-09-10 05:08:49 more
  • CODING DevOps 微服務專案實戰系列第一課,明天等你

    CODING DevOps 微服務專案實戰系列第一課**《DevOps 微服務專案實戰:DevOps 初體驗》**將由 CODING DevOps 開發工程師 王寬老師 向大家介紹 DevOps 的基本理念,并探討為什么現代開發活動需要 DevOps,同時將以 eShopOnContainers 項 ......

    uj5u.com 2020-09-10 05:09:14 more
  • CODING DevOps 微服務專案實戰系列第二課來啦!

    近年來,工程專案的結構越來越復雜,需要接入合適的持續集成流水線形式,才能滿足更多變的需求,那么如何優雅地使用 CI 能力提升生產效率呢?CODING DevOps 微服務專案實戰系列第二課 《DevOps 微服務專案實戰:CI 進階用法》 將由 CODING DevOps 全堆疊工程師 何晨哲老師 向 ......

    uj5u.com 2020-09-10 05:09:33 more
  • CODING DevOps 微服務專案實戰系列最后一課,周四開講!

    隨著軟體工程越來越復雜化,如何在 Kubernetes 集群進行灰度發布成為了生產部署的”必修課“,而如何實作安全可控、自動化的灰度發布也成為了持續部署重點關注的問題。CODING DevOps 微服務專案實戰系列最后一課:**《DevOps 微服務專案實戰:基于 Nginx-ingress 的自動 ......

    uj5u.com 2020-09-10 05:10:00 more
  • CODING 儀表盤功能正式推出,實作作業資料可視化!

    CODING 儀表盤功能現已正式推出!該功能旨在用一張張統計卡片的形式,統計并展示使用 CODING 中所產生的資料。這意味著無需額外的設定,就可以收集歸納寶貴的作業資料并予之量化分析。這些海量的資料皆會以圖表或串列的方式躍然紙上,方便團隊成員隨時查看各專案的進度、狀態和指標,云端協作迎來真正意義上 ......

    uj5u.com 2020-09-10 05:11:01 more
最新发布
  • windows系統git使用ssh方式和gitee/github進行同步

    使用git來clone專案有兩種方式:HTTPS和SSH:
    HTTPS:不管是誰,拿到url隨便clone,但是在push的時候需要驗證用戶名和密碼;
    SSH:clone的專案你必須是擁有者或者管理員,而且需要在clone前添加SSH Key。SSH 在push的時候,是不需要輸入用戶名的,如果配置... ......

    uj5u.com 2023-04-19 08:41:12 more
  • windows系統git使用ssh方式和gitee/github進行同步

    使用git來clone專案有兩種方式:HTTPS和SSH:
    HTTPS:不管是誰,拿到url隨便clone,但是在push的時候需要驗證用戶名和密碼;
    SSH:clone的專案你必須是擁有者或者管理員,而且需要在clone前添加SSH Key。SSH 在push的時候,是不需要輸入用戶名的,如果配置... ......

    uj5u.com 2023-04-19 08:35:34 more
  • 2023年農牧行業6大CRM系統、5大場景盤點

    在物聯網、大資料、云計算、人工智能、自動化技術等現代資訊技術蓬勃發展與逐步成熟的背景下,數字化正成為農牧行業供給側結構性變革與高質量發展的核心驅動因素。因此,改造和提升傳統農牧業、開拓創新現代智慧農牧業,加快推進農牧業的現代化、資訊化、數字化建設已成為農牧業發展的重要方向。 當下,企業數字化轉型已經 ......

    uj5u.com 2023-04-18 08:05:44 more
  • 2023年農牧行業6大CRM系統、5大場景盤點

    在物聯網、大資料、云計算、人工智能、自動化技術等現代資訊技術蓬勃發展與逐步成熟的背景下,數字化正成為農牧行業供給側結構性變革與高質量發展的核心驅動因素。因此,改造和提升傳統農牧業、開拓創新現代智慧農牧業,加快推進農牧業的現代化、資訊化、數字化建設已成為農牧業發展的重要方向。 當下,企業數字化轉型已經 ......

    uj5u.com 2023-04-18 08:00:18 more
  • 計算機組成原理—存盤器

    計算機組成原理—硬體結構 二、存盤器 1.概述 存盤器是計算機系統中的記憶設備,用來存放程式和資料 1.1存盤器的層次結構 快取-主存層次主要解決CPU和主存速度不匹配的問題,速度接近快取 主存-輔存層次主要解決存盤系統的容量問題,容量接近與價位接近于主存 2.主存盤器 2.1概述 主存與CPU的聯 ......

    uj5u.com 2023-04-17 08:20:31 more
  • 談一談我對協同開發的一些認識

    如今各互聯網公司普通都使用敏捷開發,采用小步快跑的形式來進行專案開發。如果是小專案或者小需求,那一個開發可能就搞定了。但對于電商等復雜的系統,其功能多,結構復雜,一個人肯定是搞不定的,所以都是很多人來共同開發維護。以我曾經待過的商城團隊為例,光是后端開發就有七十多人。 為了更好地開發這類大型系統,往 ......

    uj5u.com 2023-04-17 08:18:55 more
  • 專案管理PRINCE2核心知識點整理

    PRINCE2,即 PRoject IN Controlled Environment(受控環境中的專案)是一種結構化的專案管理方法論,由英國政府內閣商務部(OGC)推出,是英國專案管理標準。
    PRINCE2 作為一種開放的方法論,是一套結構化的專案管理流程,描述了如何以一種邏輯性的、有組織的方法,... ......

    uj5u.com 2023-04-17 08:18:51 more
  • 談一談我對協同開發的一些認識

    如今各互聯網公司普通都使用敏捷開發,采用小步快跑的形式來進行專案開發。如果是小專案或者小需求,那一個開發可能就搞定了。但對于電商等復雜的系統,其功能多,結構復雜,一個人肯定是搞不定的,所以都是很多人來共同開發維護。以我曾經待過的商城團隊為例,光是后端開發就有七十多人。 為了更好地開發這類大型系統,往 ......

    uj5u.com 2023-04-17 08:18:00 more
  • 專案管理PRINCE2核心知識點整理

    PRINCE2,即 PRoject IN Controlled Environment(受控環境中的專案)是一種結構化的專案管理方法論,由英國政府內閣商務部(OGC)推出,是英國專案管理標準。
    PRINCE2 作為一種開放的方法論,是一套結構化的專案管理流程,描述了如何以一種邏輯性的、有組織的方法,... ......

    uj5u.com 2023-04-17 08:17:55 more
  • 計算機組成原理—存盤器

    計算機組成原理—硬體結構 二、存盤器 1.概述 存盤器是計算機系統中的記憶設備,用來存放程式和資料 1.1存盤器的層次結構 快取-主存層次主要解決CPU和主存速度不匹配的問題,速度接近快取 主存-輔存層次主要解決存盤系統的容量問題,容量接近與價位接近于主存 2.主存盤器 2.1概述 主存與CPU的聯 ......

    uj5u.com 2023-04-17 08:12:06 more