开发学院软件开发VC MSComm 控件在基于单文档中的应用 阅读

MSComm 控件在基于单文档中的应用

 2006-07-21 11:15:51 来源:WEB开发网   
核心提示:本文示例源代码或素材下载 MSComm 作为一个串行通讯控件为程序员串口通讯编程节省了很多时间,在基于对话框的应用中加入一个MSComm控件非常简单,MSComm 控件在基于单文档中的应用,只需进行以下操作即可:打开“Project->Add To Project->Components

本文示例源代码或素材下载

MSComm 作为一个串行通讯控件为程序员串口通讯编程节省了很多时间。在基于对话框的应用中加入一个MSComm控件非常简单。只需进行以下操作即可:

打开“Project->Add To Project->Components and Controls->Registered Activex Controls”,然后选择控件:Microsoft Communication Control,version 6.0插入到当前的工程中。这样就将类 CMSComm 的相关文件 mscomm.cpp 和 mscomm.h 一并加入到了工程中。编程时只需将控件对话中的 MSComm 控件拖至你的应用对话框中就OK了。

对于单文档的工程应用,如果Project中的视类是基于CFormView的,创建MSComm类的方法和基于对话框的操作没什么两样。而如果视类不是基于CFormView的,那么创建MSComm类就和创建普通的ActiveX控件相类似。

1.在MscommDemoView.h中添加MSComm类声明: protected:
   CMSComm m_Comm;   
2.利用MFC ClassWizard添加CMscommDemoView::OnCreate函数并加入以下代码: DWORD style=WS_VISIBLE|WS_CHILD;
if(!m_Comm.Create(NULL,style,CRect(0,0,0,0),this,IDC_MSCOMM));
{
  TRACE0("Failed to create OLE Communication Controls!\n");
  return -1;
}   
  ID_MSCOMM 是源于对话框的中的控件ID规则,而且必须和 MSComm 控件对应,这里利用 About 对话框。把控件对话框中 MSComm 控件拖至 About 对话框。ID值为ID_MSCOMM。

3.串口初始化: m_Comm.SetCommPort(1);
m_Comm.SetInputMode(1);
m_Comm.SetSettings("9600,n,8,1");
m_Comm.SetRThreshold(1);
m_Comm.SetInputLen(0);
if(!m_Comm.GetPortOpen())
{
  m_Comm.SetPortOpen(TRUE);
}
else
  AfxMessageBox(“Open The Serial Port 1 Failurre!”);
m_Comm.GetInput();   
4.串口接收数据初始化:

MSComm 控件采用查询或事件驱动的方式从端口获取数据。这里采用事件驱动法完成对端口数据的监视和处理:有事件发生(串口接收到数据)时通知程序,并及时的捕获和处理这个通讯事件。

在MscommDemoView.h中添加事件驱动说明: protected:
  afx_msg void OnComm();
DECLARE_EVENTSINK_MAP()   
在 MscommDemoView.cpp 中添加事件的驱动: BEGIN_EVENTSINK_MAP(CMscommDemoView, CView)
  //{{AFX_EVENTSINK_MAP(CAboutDlg)
ON_EVENT(CMscommDemoView,IDC_MSCOMM,1,OnComm,VTS_NONE) 
  //}}AFX_EVENTSINK_MAP
END_EVENTSINK_MAP()   
5.串口数据读写:

MSComm 类的读写函数比较简单:GetInput()和SetOutput()。函数原形分别为VARIANT GetInput()和void SetOutput(const VARIANT newValue),均使用VARIANT类型。但PC机发送和接收数据时习惯用字符串形式。MSDN中查阅VARIANT类型,可以用BSTR表示字符串,但所有的BSTR都包含宽字符,而只有Windows NT支持宽字符,Windows 9X并不支持。所以要完成一个适应各平台的串口应用程序必须解决这个问题。这里使用CbyteArray即可解决之。

添加事件响应函数CMscommDemoView::OnComm()

//接收数据 void CMscommDemoView::OnComm()
{
  VARIANT m_input;
  char *str,*str1;
  int k,nEvent,i;
  CString str2,m_RcvData;
  nEvent=m_Comm.GetCommEvent();
  switch(nEvent)
  {
  case 2:
    k=m_Comm.GetInBufferCount();   //接收缓冲区的字符数目
    if(k>0)
    {
      m_input=m_Comm.GetInput();
      str=(char*)(unsigned char*)m_input.parray->pvData;
    }
    i=0;
    str1=str;
    while(i<k)
    {
      i++;
      str1++;
    }
    *str1=''''\0'''';               
    str2=(const char*)str;       //清除字符串中的不必要字符
    m_RcvData=(const char *)str;
  }
  //数据显示处理
}
//发送数据
void CMscommDemoView::SendData()
{
  int i,Count;
  CString m_SendData;
  m_SendData="Hello!";
  Count=m_SendData.GetLength();
  CByteArray m_Array;
  
  m_Array.RemoveAll();
  m_Array.SetSize(Count);
  
  for(i=0;i<Count;i++)
    m_Array.SetAt(i,m_SendData[i]);
  m_Comm.SetOutput(COleVariant(m_Array));
}   
  以上只是MSComm控件在基于单文档的工程中的初步框架。程序在Win2000+VC6.0下调试通过。欢迎大家讨论。

Tags:MSComm 控件 基于

编辑录入:爽爽 [复制链接] [打 印]
[]
  • 好
  • 好的评价 如果觉得好,就请您
      0%(0)
  • 差
  • 差的评价 如果觉得差,就请您
      0%(0)
赞助商链接