转载自 xtxycy

 2011-01-02 11:58

VC++下用MSComm控件实现串口通讯

　　首先，在对话框中创建通信控件，若Control工具栏中缺少该控件，可通过菜单Project --> Add to Project --> Components and Control插入即可，再将该控件从工具箱中拉到对话框中。此时，你只需要关心控件提供的对 Windows 通讯驱动程序的 API 函数的接口。换句话说，只需要设置和监视MSComm控件的属性和事件。

　　打开所需串口后，需要考虑串口通信的时机。在接收或发送数据过程中，可能需要监视并响应一些事件和错误，所以事件驱动是处理串行端口交互作用的一种非常有效的方法。使用 OnComm 事件和 CommEvent 属性捕捉并检查通讯事件和错误的值。发生通讯事件或错误时，将触发 OnComm 事件，CommEvent 属性的值将被改变，应用程序检查 CommEvent 属性值并作出相应的反应

// 若是在SDI中使用该控件则要调用下两句，在对话框程序中该语句有MFC自己创建
// 所以不用人为添加

DWORD style=WS_VISIBLE;
m_MSComm.Create(NULL,style,CRect(0,0,0,0),this,IDC_MSCOMM1);

// 串口控件的初始化

DWORD style=WS_VISIBLE;
m_MSComm.Create(NULL,style,CRect(0,0,0,0),this,IDC_MSCOMM1);
if(m_MSComm.GetPortOpen()) //如果串口是打开的，则行关闭串口
{
　m_MSComm.SetPortOpen(FALSE);
}

m_MSComm.SetCommPort(1); //选择COM1
m_MSComm.SetInBufferSize(1024); //接收缓冲区
m_MSComm.SetOutBufferSize(1024);//发送缓冲区
m_MSComm.SetInputLen(0);//设置当前接收区数据长度为0,表示全部读取
m_MSComm.SetInputMode(1);//以二进制方式读写数据
m_MSComm.SetRThreshold(1);//接收缓冲区有1个及1个以上字符时，将引发接收数据的OnComm事件
m_MSComm.SetSettings("9600,n,8,1");//波特率9600无检验位，8个数据位，1个停止位

if(!m_MSComm.GetPortOpen())//如果串口没有打开则打开
　m_MSComm.SetPortOpen(TRUE);//打开串口
else
　m_MSComm.SetOutBufferCount(0);

// 控件事件的响应声明
// *.h
//{{AFX_MSG(CGolfView)

afx_msg BOOL OnComm();
DECLARE_EVENTSINK_MAP()
//}}AFX_MSG

// *.cpp

BEGIN_EVENTSINK_MAP(CGolfView, CView)
//{{AFX_EVENTSINK_MAP(CAboutDlg)
ON_EVENT(CGolfView, IDC_MSCOMM1, 1 /* OnComm */, OnComm, VTS_NONE)
//}}AFX_EVENTSINK_MAP
END_EVENTSINK_MAP()

// 控件事件的响应
BOOL CGolfView::OnComm()
{
　VARIANT variant_inp;
　COleSafeArray safearray_inp;
　LONG len,k;
　BYTE rxdata[2048]; //设置BYTE数组 An 8-bit integerthat is not signed.
　CString strtemp;
　switch(m_MSComm.GetCommEvent())
　{
　　case 1: // comEvSend发送数据
　　　break;
　　case 2: // comEvReceive读取数据
　　　// MessageBox(_T("读取数据事件"), _T("TRACE"), MB_OK);
　　　variant_inp=m_MSComm.GetInput(); //读缓冲区
　　　safearray_inp=variant_inp; //VARIANT型变量转换为ColeSafeArray型变量
　　　len=safearray_inp.GetOneDimSize(); //得到有效数据长度
　　　// 接受数据
　　　for(k=0; k<len; k++)
　　　{
　　　　safearray_inp.GetElement(&k,rxdata+k); //转换为BYTE型数组
　　　　BYTE bt=*(char*)(rxdata+k); //字符型
　　　　strtemp.Format("%c",bt); //将字符送入临时变量strtemp存放
　　　　recd+=strtemp;
　　　}

　　　// UpdateData(TRUE);
　
　　　break;
　　default: // 传输事件出错
　　　m_MSComm.SetOutBufferCount(0);
　　　break;
　　}
　UpdateData(FALSE); //更新图象内容
　return TRUE;
}

核心代码

初始化函数

BOOL CSCommTestDlg::OnInitDialog()
{
CDialog::OnInitDialog();

// Add "About..." menu item to system menu. made by lzycsd

// IDM_ABOUTBOX must be in the system command range.
ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX);
ASSERT(IDM_ABOUTBOX < 0xF000);

CMenu* pSysMenu = GetSystemMenu(FALSE);
if (pSysMenu != NULL)
{
   CString strAboutMenu;
   strAboutMenu.LoadString(IDS_ABOUTBOX);
   if (!strAboutMenu.IsEmpty())
   {
    pSysMenu->AppendMenu(MF_SEPARATOR);
    pSysMenu->AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu);
   }
}

// Set the icon for this dialog. The framework does this automatically
// when the application's main window is not a dialog
SetIcon(m_hIcon, TRUE);    // Set big icon
SetIcon(m_hIcon, FALSE);   // Set small icon

// TODO: Add extra initialization here
////////////////////////////////////////////////
////其他初始化
m_ctrlComboComPort.SetCurSel(0); //初始选择串口1
m_ctrlComboBaudRate.SetCurSel(6); //初始选择波特率9600
m_ctrlComboParityBit.SetCurSel(0); //初始选择校验位无
m_ctrlComboDataBit.SetCurSel(3); //初始选择数据位8位
m_ctrlComboStopBit.SetCurSel(0); //初始选择停止位1位

m_strSendPeriod="1000"; //初始自动发送周期为1000毫秒
UpdateData(FALSE); //修改编辑框内容
//GetDlgItem(IDC_EDIT_SENDPERIOD)->SetWindowText("1000");另一种方法设置
////其他初始化
////////////////////////////////////////////////
//串口初始化
m_ctrlComm.SetCommPort(m_ctrlComboComPort.GetCurSel()+1); //选择COM1
//波特率9600，无校验，8个数据位，1个停止位
m_ctrlComm.SetInputMode(1); //输入方式为二进制方式
m_ctrlComm.SetInBufferSize(1024); //设置输入缓冲区大小
m_ctrlComm.SetOutBufferSize(512); //设置输出缓冲区大小
//波特率9600，无校验，8个数据位，1个停止位
m_ctrlComm.SetSettings("9600,N,8,1");
if(!m_ctrlComm.GetPortOpen())
// {
   m_ctrlComm.SetPortOpen(TRUE); //打开串口 SetPortOpen函数返回值为void
// m_ctrlOpenCom.EnableWindow(FALSE); //使按钮变灰
  
   //if (!m_ctrlComm.GetPortOpen())
   // 如果串口已经打开(打开串口失败)，会走到这里来，加上你的判断就可以了……

   // AfxMessageBox("没有发现此串口或被其他程序占用");
    //m_ctrlCloseCom.EnableWindow(FALSE); //打开串口失败
   // m_ctrlOpenCom.EnableWindow(TRUE);

// }
// else
// {
// m_ctrlOpenCom.EnableWindow(FALSE);
// }
m_ctrlComm.SetRThreshold(1); //参数1表示每当串口接受缓冲区中有多于或等于1个字符时将引发一个接受数据的OnComm事件
m_ctrlComm.SetInputLen(0); //设置当前接受区数据长度为0
m_ctrlComm.GetInput(); //先预读缓冲区以清除残留数据

m_bSerialPortOpened=TRUE; //串口成功打开
m_ctrlOpenCom.EnableWindow(!m_bSerialPortOpened); //打开串口按钮失效
m_ctrlCloseCom.EnableWindow(m_bSerialPortOpened); //关闭串口按钮有效

 

return TRUE; // return TRUE unless you set the focus to a control
}

从串口接受数据并显示在接受编辑框中

static long rxdatacount=0; //接受字符计数

void CSCommTestDlg::OnComm()
{
// TODO: Add your control notification handler code here
VARIANT variant_inp;
COleSafeArray safearray_inp;
LONG len,k;
BYTE rxdata[2048]; //设置BYTE数组
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_strEditRXData+=strtemp; //加入接受编辑框对应字符串

   ////////////////////////////////////////////////////
    //放在这里计数 会卡
    //rxdatacount++; //接受的字节计数
    //CString temp;
    //temp.Format("%ld",rxdatacount);
    //temp="接受："+temp;
    //m_ctrlRXCount.SetWindowText(temp); //显示接受计数
    ////////////////////////////////////////////////////
   }

rxdatacount+=len;
   //m_ctrlRXCount.SetWindowText("接受："+rxdatacount);
   CString temp;
   temp.Format("%ld",rxdatacount);
   temp="接受："+temp;
   m_ctrlRXCount.SetWindowText(temp); //显示接受计数
}
UpdateData(FALSE); //更新编辑框内容

}

点击发送按钮处理函数

//手工发送数据
long TX_count=0;

void CSCommTestDlg::OnButtonManualsend()
{
// TODO: Add your control notification handler code here
UpdateData(TRUE); //读取编辑框内容
m_ctrlComm.SetOutput(COleVariant(m_strEditTXData)); //发送数据

X_count+=m_strEditTXData.GetLength(); //发送计数

CString strTemp;
strTemp.Format("发送：%d",TX_count);
m_ctrlTXCount.SetWindowText(strTemp); //显示计数
GetDlgItem(IDC_BUTTON_MANUALSEND)->EnableWindow(TRUE);
}

void CSCommTestDlg::OnEditchangeComboComport()
{
// TODO: Add your control notification handler code here

}

改变串口时的处理函数

void CSCommTestDlg::OnSelchangeComboComport()
{
// TODO: Add your control notification handler code here
//int Cpos=m_ctrlComboComPort.GetCurSel()+1; //获取当前选择的串口号
//测试用
//CString myString ;
//myString.Format("%d",Cpos);
//CWnd*   pWnd   =   GetDlgItem(IDC_STATIC1);  
//pWnd->SetWindowText(_T(myString));
//测试用
//if(m_ctrlComm)
if(m_ctrlComm.GetPortOpen())
{
   m_ctrlComm.SetPortOpen(FALSE); //关闭串口
   m_bSerialPortOpened=FALSE; //串口成功关闭
   m_ctrlOpenCom.EnableWindow(!m_bSerialPortOpened); //打开串口按钮有效
   m_ctrlCloseCom.EnableWindow(m_bSerialPortOpened); //关闭串口按钮失效
}

//打开串口//选择相应的波特率，校验位，数据位，停止位
m_ctrlComm.SetCommPort(m_ctrlComboComPort.GetCurSel()+1); //选择相应的COM

m_ctrlComm.SetInputMode(1); //输入方式为二进制方式
m_ctrlComm.SetInBufferSize(1024);//设置输入缓冲区大小
m_ctrlComm.SetOutBufferSize(512); //设置输出缓冲区大小
//选择相应的波特率，校验位，数据位，停止位
CString   setstr;
CString tempstr;
m_ctrlComboBaudRate.GetWindowText(tempstr); //获取波特率
setstr=tempstr;
setstr+=",";
m_ctrlComboParityBit.GetWindowText(tempstr); //获取校验位
tempstr=tempstr.Left(1); //取第一个单词
setstr=setstr+tempstr+",";
m_ctrlComboDataBit.GetWindowText(tempstr); //获取数据位
setstr=setstr+tempstr+",";
m_ctrlComboStopBit.GetWindowText(tempstr); //获取停止位
setstr+=tempstr;
/*
int BaudRate = 9600;
char ParityBit = n;
int DataBit = 8;
int StopBit = 1;
setstr.Format( "%d,%c,%d,%d ",BaudRate,ParityBit,DataBite,StopBit);
SetSettings(setstr);
*/
//m_ctrlComm.SetSettings("9600,N,8,1");
m_ctrlComm.SetSettings(setstr);
if(!m_ctrlComm.GetPortOpen())
   m_ctrlComm.SetPortOpen(TRUE); //打开串口
m_ctrlComm.SetRThreshold(1); //参数1表示每当串口接受缓冲区中有多于或等于1个字符时将引发一个接受数据的OnComm事件
m_ctrlComm.SetInputLen(0); //设置当前接受区数据长度为0
m_ctrlComm.GetInput(); //先预读缓冲区以清除残留数据

m_bSerialPortOpened=TRUE; //串口成功打开
m_ctrlOpenCom.EnableWindow(!m_bSerialPortOpened); //打开串口按钮失效
m_ctrlCloseCom.EnableWindow(m_bSerialPortOpened); //关闭串口按钮有效
}

打开串口

void CSCommTestDlg::OnButtonOpen()
{
// TODO: Add your control notification handler code here
if(!m_ctrlComm.GetPortOpen())
{
   m_ctrlComm.SetPortOpen(TRUE);
   m_bSerialPortOpened=TRUE; //串口成功打开
   m_ctrlOpenCom.EnableWindow(!m_bSerialPortOpened); //打开串口按钮失效
   m_ctrlCloseCom.EnableWindow(m_bSerialPortOpened); //关闭串口按钮有效

}

}

关闭串口

void CSCommTestDlg::OnButtonClose()
{
// TODO: Add your control notification handler code here
if(m_ctrlComm.GetPortOpen())
{
   m_ctrlComm.SetPortOpen(FALSE);
   m_bSerialPortOpened=FALSE; //串口成功关闭
   m_ctrlOpenCom.EnableWindow(!m_bSerialPortOpened); //打开串口按钮有效
   m_ctrlCloseCom.EnableWindow(m_bSerialPortOpened); //关闭串口按钮失效
}
}

定时器触发后运行的函数
void CSCommTestDlg::OnTimer(UINT nIDEvent)
{
// TODO: Add your message handler code here and/or call default
//添加你要处理的函数，当定时时间到时自动调用
//通过调用 SetTimer(1,1000,NULL)启动定时器，通过调用KillTimer(int nIDEvent)关闭定时器
OnButtonManualsend();
CDialog::OnTimer(nIDEvent);
}
选择自动发送触发的函数
void CSCommTestDlg::OnCheckAutosend()
{
// TODO: Add your control notification handler code here
if(m_ctrlAutoSend.GetCheck())
{ //自动发送
  int i=atoi(m_strSendPeriod);
   SetTimer(1,i,NULL);
   //函数反回值就是第一个参数值1，表示此定时器的ID号。
   //第二个参数表示要等待100毫秒时间再重新处理一次。第三个参数在这种方法中一般用NULL。
   //注意：设置第二个参数时要注意，如果设置的等待时间比处理时间短，程序就会出问题了。
   //OnButtonManualsend();
}
else
{ //取消自动发送
   KillTimer(1); // 结束标号为1的定时器

}

}
发送周期更改时触发的函数
void CSCommTestDlg::OnChangeEditSendperiod()
{
// TODO: If this is a RICHEDIT control, the control will not
// send this notification unless you override the CDialog::OnInitDialog()
// function and call CRichEditCtrl().SetEventMask()
// with the ENM_CHANGE flag ORed into the mask.
UpdateData(TRUE); //读取编辑框内容

// TODO: Add your control notification handler code here

}

接受区清空显示

void CSCommTestDlg::OnButtonCleardisplay()
{
// TODO: Add your control notification handler code here
//m_strEditRXData="";
m_strEditRXData.Empty();
UpdateData(FALSE); //修改为空
}

计数清空

void CSCommTestDlg::OnButtonClearcount()
{
// TODO: Add your control notification handler code here
rxdatacount=0;
TX_count=0;
m_ctrlTXCount.SetWindowText("发送：0");
m_ctrlRXCount.SetWindowText("接受：0");
}

发送区更新

void CSCommTestDlg::OnChangeEditTxdata()
{
//CString temp;
//GetDlgItem(IDC_EDIT_TXDATA)->GetWindowText(temp);
//if(temp=="")
//{
// UpdateData(TRUE); //读取编辑框中的内容到 m_strEditRXData;
// AfxMessageBox(_T("已清空"));
//}
UpdateData(TRUE); //

// TODO: If this is a RICHEDIT control, the control will not
// send this notification unless you override the CDialog::OnInitDialog()
// function and call CRichEditCtrl().SetEventMask()
// with the ENM_CHANGE flag ORed into the mask.

// TODO: Add your control notification handler code here

}

接受区清空

void CSCommTestDlg::OnButtonClearsend()
{
// TODO: Add your control notification handler code here
   // TODO: Add your control notification handler code here
m_strEditTXData.Empty();
UpdateData(FALSE); //修改为空
}

 

一个项目从vc6迁移到VS2005，在修改了一系列的类型警告后。编译成功了，Debug的时候，结果却冒出一个R6034错误："An application has made an attempt to load the C runtime library incorrectly. Please contact the application's support team for more information."
      Output Window:app.exe 中的 0x7c984ed1 处最可能的异常: 0xC0000142: DLL Initialization Failed。
      编译条件是：Linker->Manifest File ->Allow Isolation:Yes。

    在同样的编译条件下，Release则可以正常编译运行。

采取解决措施：在stdafx.h文件中加入：

#pragma comment(linker, "/"/manifestdependency:type='Win32' name='Microsoft.VC80.CRT' version='8.0.50608.0' processorArchitecture='X86' publicKeyToken='1fc8b3b9a1e18e3b' language='*'/"")
   之后，调试中出现若干错误,屏蔽掉错误代码，可以运行，只是最前面的一个splash窗体没有了。
   (参考：http://forums.microsoft.com/china/ShowPost.aspx?PostID=1988459&SiteID=15)

在此之前，参考了很多关于R6034错误的网页，主要是考虑manifest：

    （1）磁盘系统是fat32格式的：FAT32的时间精度不够,所以linker在生成文件的时候会出错，如果是ntfs的就没有问题.VS2005项目设置里面在清单工具（Manifest Tool）下面有一个选项"使用FAT32解决办法"(Use FAT32 work around)是专门解决这个问题的.对于FAT32的磁盘，需要选择"Yes"，默认是"No".

    (2)Visual Studio 2005用向导生成的项目，在运行时可能会遇到找不到MFC80UD.dll的问题。这个问题可能是Manifest 引起的，因此我们可以通过修改项目属性(properties)->清单工具(property pages)->链接(linker)-->manifest file -->Allow Isolation，把“嵌入清单”选“否”，.然后编译、链接、运行即可。

Visual Studio 2005用向导生成的项目，在运行时可能会遇到找不到MFC80UD.dll的问题。这个问题可能是Manifest 引起的，因此我们可以通过修改项目属性->清单工具->输入输出，把“嵌入清单（Embed Manifest）”选“否”，.然后编译、链接、运行即可。

    (3)有人提示，在项目属性里，mfc的使用应该设置为静态链接。但我改成静态后，会有很多错误，于是放弃。

    （4）问了一个论坛上的网友，他说可能和Microsoft C++ Runtime Library有关系。

     除此之外，一个参考文献上说的解决方法是：将Linker->Manifest File ->Allow Isolation：Do not Allow Side by Side isolation，则无论在Debug和Release条件，都出现如下：This application has failed to start because MSVCR80D.dll was not found. Re-installing the application may fix the problem."

    关于这个问题，有篇博客文章上说：

VS2005在FAT32分区的介质上对于Win32程序编译的一些注意

问题描述：大部分的vs.net 2005的用户在新建“win32项目－windows应用程序”的时候，新建的工程都通不过去，出现如下提示：
Solution to “MSVCR80D.dll not found”
“没有找到MSVCR80D.dll，因此这个应用程序未能启动。重新安装应用程序可能会修复此问题。”

问题所在：由于vs.net 2005 采用了一种新的DLL方案，搞成一个exe还要配有一个manifest文件（一般在嵌入文件里了，所以看不到，不过也可以不嵌入，这样会生产一个<程序名>.exe.manifest的文件，没它exe自己就转不了了：）这是个新功能，微软弄了个新工具（mt.exe），结果不好用，好像是fat32下时间戳有问题（在ntfs下这个问题就没有了），搞得manifest有时嵌入不到exe中（默认配置是嵌入的，所以就报错找不到dll了。

解决方案
1． 微软的解决方案。
　　在“属性->配置属性->清单工具->常规“下有一个”使用FAT32解决办法，设置为"是"
2． 找到你的工程的文件夹，如（myproject），找到其下的myproject/myproject/Debug/，Delete it.