请教：串口编程问题

allanhouston

大家好，老板前两天教我做串口方面的编程，以前没有接触过，我在网上看到了这个页面http://www.gjwtech.com/vcandc/scommassistantcode.htm
是gjw的主页上的，我按照步骤进行到第6步执行之后，系统通知我关闭对话框，应该是程序不好用，希望能得到大家的帮助
附：我已经安装了串口调试助手，并且按着要求将串口改为COM2

allanhouston

我大概是这么执行的,代码中应该肯定有错误,但是我实在找不出来,希望各位朋友帮助了
1.建立项目：打开VC＋＋6.0，建立一个基于对话框的MFC应用程序SCommTest；
2.在项目中插入MSComm控件   选择Project菜单下Add To Project子菜单中的 Components and Controls…选项，在弹出的对话框中双击Registered ActiveX Controls项。 选择Microsoft Communications Control, version 6.0，，单击Insert按钮将它插入到我们的Project中来，接受缺省的选项
这时在ClassView视窗中就可以看到CMSComm类了，并且在控件工具栏Controls中出现了电话图标（如图1所示），现在要做的是用鼠标将此图标拖到对话框中。
3.利用ClassWizard定义CMSComm类控制对象  打开ClassWizard－>;Member Viariables选项卡，选择CSCommTestDlg类，为IDC_MSCOMM1添加控制变量：m_ctrlComm
4.在对话框中添加控件  向主对话框中添加两个编辑框，一个用于接收显示数据ID为IDC_EDIT_RXDATA，另一个用于输入发送数据，ID为IDC_EDIT_TXDATA，再添加一个按钮，功能是按一次就把发送编辑框中的内容发送一次，将其ID设为IDC_BUTTON_MANUALSEND。别忘记了将接收编辑框的Properties－>;Styles中把Miltiline和Vertical Scroll属性选上
再打开ClassWizard－>;Member Viariables选项卡，选择CSCommTestDlg类， 为IDC_EDIT_RXDATA添加CString变量m_strRXData， 为IDC_EDIT_TXDATA添加CString变量m_strTXData。说明： m_strRXData和m_strTXData分别用来放入接收和发送的字符数据。
5.添加串口事件消息处理函数OnComm() 打开ClassWizard－>;Message Maps，选择类CSCommTestDlg，选择IDC_MSCOMM1，双击消息OnComm，将弹出的对话框中将函数名改为OnComm。
这个函数是用来处理串口消息事件的，如每当串口接收到数据，就会产生一个串口接收数据缓冲区中有字符的消息事件，刚才添加的函数就会执行，在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); //更新编辑框内容
}


到目前为止还不能在接收编辑框中看到数据，因为我们还没有打开串口
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，选上自动发送，也可以等会手动发送。再执行编写的程序

文中指出,这个时候应该看到程序执行,可是并没有任何结果,如果朋友们看到哪里有代码错误的话,请详细指出,万分感谢!!

allanhouston

Mscomm控件共有27个属性，其中经常用到的有
属性            描述
CommPort    设置或返回通信端口号
Settings       以字符串的形式设置或返回波特率、奇偶校验、数据位和停止位
PortOpen     设置或返回通信端口的状态。也可以打开和关闭端口
Input            返回和删除接收缓冲区中的字符
Output         将字符串写入发送缓冲区

第6步中是对这些属性进行设置，我想大概是第5步的处理代码有问题