串口调试助手源程序及编程详细过程Word下载.docx
- 文档编号:22337697
- 上传时间:2023-02-03
- 格式:DOCX
- 页数:18
- 大小:36.82KB
串口调试助手源程序及编程详细过程Word下载.docx
《串口调试助手源程序及编程详细过程Word下载.docx》由会员分享,可在线阅读,更多相关《串口调试助手源程序及编程详细过程Word下载.docx(18页珍藏版)》请在冰豆网上搜索。
请你在函数中加入如下代码:
voidCSCommTestDlg:
:
OnComm()
{
//TODO:
Addyourcontrolnotificationhandlercodehere
VARIANTvariant_inp;
COleSafeArraysafearray_inp;
LONGlen,k;
BYTErxdata[2048];
//设置BYTE数组An8-bitintegerthatisnotsigned.
CStringstrtemp;
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型数组
k++)//将数组转换为Cstring型变量
{
BYTEbt=*(char*)(rxdata+k);
//字符型
strtemp.Format("
%c"
bt);
//将字符送入临时变量strtemp存放
m_strRXData+=strtemp;
//加入接收编辑框对应字符串
}
UpdateData(FALSE);
//更新编辑框内容
}
到目前为止还不能在接收编辑框中看到数据,因为我们还没有打开串口,但运行程序不应该有任何错误,不然,你肯定哪儿没看仔细,因为我是打开VC6对照着做一步写一行的,运行试试。
没错吧?
那么做下一步:
6.打开串口和设置串口参数
你可以在你需要的时候打开串口,例如在程序中做一个开始按钮,在该按钮的处理函数中打开串口。
现在我们在主对话框的CSCommTestDlg:
OnInitDialog()打开串口,加入如下代码:
//TODO:
Addextrainitializationhere
if(m_ctrlComm.GetPortOpen())
m_ctrlComm.SetPortOpen(FALSE);
//如果串口已经打开,关闭串口
m_ctrlComm.SetCommPort
(1);
//选择com1
if(!
m_ctrlComm.GetPortOpen())
m_ctrlComm.SetPortOpen(TRUE);
//打开串口
else
AfxMessageBox("
cannotopenserialport"
);
m_ctrlComm.SetSettings("
9600,n,8,1"
//波特率9600,无校验,8个数据位,1个停止位
m_ctrlComm.SetInputMode
(1);
//1:
表示以二进制方式检取数据
m_ctrlComm.SetRThreshold
(1);
//参数1表示每当串口接收缓冲区中有多于或等于1个字符时将引发一个接收数据的OnComm事件
m_ctrlComm.SetInputLen(0);
//设置当前接收区数据长度为0
m_ctrlComm.GetInput();
//先预读缓冲区以清除残留数据
现在你可以试试程序了,将串口线接好后,打开串口调试助手,并将串口设在com2,选上自动发送,也可以等会手动发送。
再执行你编写的程序,接收框里应该有数据显示了。
7.发送数据
先为发送按钮添加一个单击消息即BN_CLICKED处理函数,打开ClassWizard->
MessageMaps,选择类CSCommTestDlg,选择IDC_BUTTON_MANUALSEND,双击BN_CLICKED添加OnButtonManualsend()函数,并在函数中添加如下代码:
OnButtonManualsend()
UpdateData(TRUE);
//读取编辑框内容
m_ctrlComm.SetOutput(COleVariant(m_strTXData));
//发送数据
运行程序,在发送编辑框中随意输入点什么,单击发送按钮,啊!
看看,在另一端的串口调试助手(或别的调试工具)接收框里出现了什么。
如果你真是初次涉猎串口编程,又一次成功,那该说声谢谢我了,因为我第一次做串口程序时可费劲了,那时网上的资料也不好找。
开开玩笑,谢谢你的支持,有什么好东西别忘了给我寄一份。
最后说明一下,由于用到VC控件,在没有安装VC的计算机上运行时要从VC中把mscomm32.ocx、msvcrt.dll、mfc42.dll拷到Windows目录下的System子目录中(win2000为System32)并再进行注册设置,请参考如何手工注册MSComm控件。
8.发送十六进制字符
在主对话框中加入一个复选接钮,ID为IDC_CHECK_HEXSENDCaption:
十六进制发送,再利用ClassWizard为其添加控制变量:
m_ctrlHexSend;
在ClassView中为SCommTestDlg类添加以下两个PUBLIC成员函数,并输入相应代码;
//由于这个转换函数的格式限制,在发送框中的十六制字符应该每两个字符之间插入一个空隔
//如:
A123450B0029
//CByteArray是一个动态字节数组,可参看MSDN帮助
intCSCommTestDlg:
String2Hex(CStringstr,CByteArray&
senddata)
inthexdata,lowhexdata;
inthexdatalen=0;
intlen=str.GetLength();
senddata.SetSize(len/2);
for(inti=0;
i<
)
charlstr,hstr=str[i];
if(hstr=='
'
i++;
continue;
if(i>
=len)
break;
lstr=str[i];
hexdata=ConvertHexChar(hstr);
lowhexdata=ConvertHexChar(lstr);
if((hexdata==16)||(lowhexdata==16))
else
hexdata=hexdata*16+lowhexdata;
senddata[hexdatalen]=(char)hexdata;
hexdatalen++;
senddata.SetSize(hexdatalen);
returnhexdatalen;
//这是一个将字符转换为相应的十六进制值的函数
//好多C语言书上都可以找到
//功能:
若是在0-F之间的字符,则转换为相应的十六进制字符,否则返回-1
charCSCommTestDlg:
ConvertHexChar(charch)
if((ch>
='
0'
)&
&
(ch<
9'
))
returnch-0x30;
elseif((ch>
A'
F'
returnch-'
+10;
a'
f'
elsereturn(-1);
再将CSCommTestDlg:
OnButtonManualsend()修改成以下形式:
if(m_ctrlHexSend.GetCheck())
CByteArrayhexdata;
intlen=String2Hex(m_strTXData,hexdata);
//此处返回的len可以用于计算发送了多少个十六进制数
m_ctrlComm.SetOutput(COleVariant(hexdata));
//发送十六进制数据
//发送ASCII字符数据
现在,你先将串口线接好并打开串口调试助手V2.1,选上以十六制显示,设置好相应串口,然后运行我们这个程序,在发送框中输入00010203A1CC等十六进制字符,并选上以十六进制发送,单击手动发送,在串口调试助手的接收框中应该可以看到00010203A1CC了。
9.在接收框中以十六进制显示
这就容易多了:
在主对话框中加入一个复选接钮,IDC_CHECK_HEXDISPLAYCaption:
十六进制显示,再利用ClassWizard为其添加控制变量:
m_ctrlHexDiaplay。
然后修改CSCommTestDlg:
OnComm()函数:
VARIANTvariant_inp;
COleSafeArraysafearray_inp;
LONGlen,k;
BYTErxdata[2048];
CStringstrtemp;
if(m_ctrlComm.GetCommEvent()==2)//事件值为2表示接收缓冲区内有字符
variant_inp=m_ctrlComm.GetInput();
safearray_inp=variant_inp;
len=safearray_inp.GetOneDimSize();
for(k=0;
safearray_inp.GetElement(&
BYTEbt=*(char*)(rxdata+k);
if(m_ctrlHexDisplay.GetCheck())
strtemp.Format("
%02X"
//将字符以十六进制方式送入临时变量strtemp存放,注意这里加入一个空隔
m_strRXData+=strtemp;
UpdateData(FALSE);
测试:
在串口调试助手发送框中输入00010203A1CC等十六进制字符,并选上以十六进制发送,单击手动发送,在本程序运行后选上以十六进制显示,在串口调试助手中单击手动发送或自动发送,则在本程序的接收框中应该可以看到00010203A1CC了。
10.如何设置自动发送
最简单的设定自动发送周期是用SetTimer()函数,这在数据采集中很有用,在控制中指令的传送也可能用到定时发送。
方法是:
在ClassWizard中选上MessageMap卡,然后在ObjectsIDs选中CSCommTestDlg类,再在Messages框中选上WM_TIMER消息,单击ADD_FUNCTION加入voidCSCommTestDlg:
OnTimer(UINTnIDEvent)函数,这个函数是放入“时间到”后要处理的代码:
OnTimer(UINTnIDEvent)
Addyourmessagehandlercodehereand/orcalldefault
OnButtonManualsend();
CDialog:
OnTimer(nIDEvent);
再在在主对话框中加入一个复选接钮,ID为IDC_CHECK_AUTOSENDCaption:
自动发送(周期1秒),再利用ClassWizard为其添加BN_CLICK消息处理函数voidCSCommTestDlg:
OnCheckAutosend():
OnCheckAutosend()
m_bAutoSend=!
m_bAutoSend;
if(m_bAutoSend)
SetTimer(1,1000,NULL);
//时间为1000毫秒
KillTimer
(1);
//取消定时
其中:
m_bAutoSend为BOOL型变量,在CLASSVIEW中为CSCommTestDlg类加入,并在构造函数中初始化:
m_bAutoSen=FALSE;
现在可以运行程序测试了。
11.什么是VARIANT数据类型?
如何使用VARIANT数据类型?
不知如何使用VARIANT数据类型,有不少朋友对VARIANT这个新的数据类型大感头疼。
SetOutput()函数中需要的VARIANT参数还可以使用COleVariant类的构造函数简单生成,现在GetInput()函数的返回值也成了VARIANT类型,那么如何从返回的值中提取有用的内容。
VARIANT及由之而派生出的COleVariant类主要用于在OLE自动化中传递数据。
实际上VARIANT也只不过是一个新定义的结构罢了,它的主要成员包括一个联合体及一个变量。
该联合体由各种类型的数据成员构成,而该变量则用来指明联合体中目前起作用的数据类型。
我们所关心的接收到的数据就存储在该联合体的某个数据成员中。
该联合体中包含的数据类型很多,从一些简单的变量到非常复杂的数组和指针。
由于通过串口接收到的内容常常是一个字节串,我们将使用其中的某个数组或指针来访问接收到的数据。
这里推荐给大家的是指向一个SAFEARRAY(COleSafeArray)类型变量。
新的数据类型SAFEARRAY正如其名字一样,是一个“安全数组”,它能根据系统环境自动调整其16位或32位的定义,并且不会被OLE改变(某些类型如BSTR在16位或32位应用程序间传递时会被OLE翻译从而破坏其中的二进制数据)。
大家无须了解SAFEARRAY的具体定义,只要知道它是另外一个结构,其中包含一个(void*)类型的指针pvData,其指向的内存就是存放有用数据的地方。
简而言之,从GetInput()函数返回的VARIANT类型变量中,找出parray指针,再从该指针指向的SAFEARRAY变量中找出pvData指针,就可以向访问数组一样取得所接收到的数据了。
具体应用请参见voidCSCommTestDlg:
OnComm()函数。
大概我现在也说不清这个问题,我自己从第一次接触这个东西,到现在还是给别人讲不清。
另:
二进制收发设置请参考MSComm控件说明。
如何手工注册MSComm控件
大家知道,当我们安装VC++6.0/VB6.0时,如果选择了ACtiveX控件项(自定义安装),MSComm控件就会自动安装在计算机上了,并在系统文件夹下多了3个文件:
Mscomm.srg,Mscomm32.ocx,Mscomm32.dep
注意,操作系统不同,则系统文件夹不同:
Win98:
windows/system
Win2000:
winnt/system32
那么用了MSComm控件的程序在发布时或者在DELPHI开发环境下如何来注册MSComm控件呢?
发布程序时可以用安装程序,我们这里不介绍,只谈谈如何手工来注册安装MSComm控件。
第一步:
将Mscomm.srg,Mscomm32.ocx,Mscomm32.dep三个文件复制到系统文件夹中。
要注意的是,MSComm控件是要授权的,所以必须将其使用“执照”Licence在注册表中登记注册,下一步就是注册方法。
至于为什么要这样做,可以看看下面的网页:
第二步:
用Windows下的注册工具regsvr32注册该OCX控件,点击“开始”->
"
运行"
,再在中填入(假设操作安装在C盘,WIN2000):
Regsvr32
C:
winntsystem32Mscomm32.ocx
第三步:
在注册表中手工新建一个主键项:
先在点击“开始”->
,再在中填入regedit命令打开注册表,找到HKEY_CLASSES_ROOTLicenses,在其中添加主键
4250E830-6AC2-11cf-8ADB-00AA00C00905 并将内容设置为:
kjljvjjjoquqmjjjvpqqkqmqykypoqjquoun
(注:
这项内容也可以用记事本程序打开Mscomm.srg文件看到)
在VC(包括VC.NET)中应用,我已经介绍多次了,这里再说说在Delphi中的应用:
进入Delphi环境中,选择菜单命令:
Component->
ImportActiveXControl,在列表中可以看到MicrosoftCommControl,version6.0,选中后点击Install按钮,就完成安装。
在ActiveX控件页上可以看到MSComm控件的电话图标。
MSComm控件说明
MSComm控件通过串行端口传输和接收数据,为应用程序提供串行通讯功能。
MSComm控件在串口编程时非常方便,程序员不必去花时间去了解较为复杂的API函数,而且在VC、VB、Delphi等语言中均可使用。
MicrosoftCommunicationsControl(以下简称MSComm)是Microsoft公司提供的简化Windows下串行通信编程的ActiveX控件,它为应用程序提供了通过串行接口收发数据的简便方法。
具体的来说,它提供了两种处理通信问题的方法:
一是事件驱动(Event-driven)方法,一是查询法。
1.MSComm控件两种处理通讯的方式
MSComm控件提供下列两种处理通讯的方式:
事件驱动方式和查询方式。
1.1事件驱动方式
事件驱动通讯是处理串行端口交互作用的一种非常有效的方法。
在许多情况下,在事件发生时需要得到通知,例如,在串口接收缓冲区中有字符,或者CarrierDetect(CD)或RequestToSend(RTS)
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 串口 调试 助手 源程序 编程 详细 过程