利用MSCOMM串口通信控件进行异步串行通信的VC程序设计.doc
《利用MSCOMM串口通信控件进行异步串行通信的VC程序设计.doc》由会员分享,可在线阅读,更多相关《利用MSCOMM串口通信控件进行异步串行通信的VC程序设计.doc(28页珍藏版)》请在淘文阁 - 分享文档赚钱的网站上搜索。
1、利用MSCOMM串口通信控件进行异步串行通信的VC程序设计一 课程设计题目 利用MSCOMM串口通信控件进行异步串行通信的VC程序设计二 课程设计要求 环境要求:Windows95/98/2000/XP功能要求:能将键盘上输入的数据发送到另一台计算机上; 能将接收到的数据显示到屏幕窗口内;了解常用通信网络设备的操作和应用,掌握常用的通信协议的工作原理,能利用Visual C+、开发工具完成相应的通信程序的设计工作。学习简明地介绍自己的设计工作。三 课程设计目的 用Visual C+编程工具主机提供的接口,解决网络用户之间的交互式对话问题。进一步深入掌握网络设计和通信程序的设计原理。使学生对计算
2、机通信网络的设计实现有较深的了解,培养较高的通信网络设计能力。四 程序思路硬件连接方面:数据的发送和接收由软件控制,不进行硬件握手,其连接方法如图真正需要互相连接的是RXD、TXD和GND;软件方面:串行端口的本质功能是作为CPU和串行设备间的编码转换器。当数据从 CPU经过串行端口发送出去时,字节数据转换为串行的位。在接收数据时,串行的位被转换为字节数据在Windows环境(Windows NT、Win98、Windows2000)下,串口是系统资源的一部分。应用程序要使用串口进行通信,必须在使用之前向操作系统提出资源申请要求(打开串口),通信完成后必须释放资源(关闭串口)。VC+ 6.0提
3、供的MSComm控件通过串行端口发送和接收数据,为应用程序提供串行通信功能。使用非常方便。在当前的Workspace中插入MSComm控件。 Project菜单-Add to Project-Components and Controls-Registered ActiveX Controls-选择Components: Microsoft Communications Control, version 6.0 插入到当前的Workspace中。 结果添加了类CMSComm(及相应文件:mscomm.h和mscomm.cpp )。在mscomm.h中加入MSComm控件。protected:
4、CMSComm m_ComPort;在mscomm.cpp:OnCreare()中:DWORD style=WS_VISIBLE|WS_CHILD; if (!m_ComPort.Create(NULL,style,CRect(0,0,0,0),this,ID_COMMCTRL)TRACE0(Failed to create OLE Communications Controln);return -1; / fail to create.打开并初始化串口void CComDlg:OnOpencom() if(m_Com.GetPortOpen() /打开通信端口m_Com.SetPortOpe
5、n(FALSE);m_Com.SetCommPort(1); /选择com1if( !m_Com.GetPortOpen()m_Com.SetPortOpen(TRUE);/打开串口MessageBox(串口已经打开);elseMessageBox(不能打开串口!);m_Com.SetSettings(9600,n,8,1); /波特率9600,无校验,8个数据位,1个停止位 /以字符串的形式设置并返回波特率、奇偶校验、数据位、停止位m_Com.SetInputMode(1); / 定义Input属性获取数据的方式(为0:文本方式;为1:二进制方式)。m_Com.SetRThreshold(1
6、); /为1表示有一个字符引发一个事件m_Com.SetInputLen(0); /设置每次Input读入的字符个数,缺省值为0,表明读取接收缓冲区中的全部内容m_Com.GetInput();m_opened=TRUE;捕捉串口事项。MSComm控件可以采用轮询或事件驱动的方法从端口获取数据。我们介绍比较使用的事件驱动方法:有事件(如接收到数据)时通知程序。在程序中需要捕获并处理这些通讯事件。在MainFrm.h中:protected:afx_msg void OnCommMscomm();DECLARE_EVENTSINK_MAP()在ComDlg.cpp中:BEGIN_EVENTSINK
7、_MAP(CComDlg, CDialog) /AFX_EVENTSINK_MAP(CComDlg)ON_EVENT(CComDlg, IDC_MSCOMM2, 1 /* OnComm */, OnComm, VTS_NONE)/AFX_EVENTSINK_MAPEND_EVENTSINK_MAP() / 映射ActiveX控件串口读写.完成读写的函数的确很简单,GetInput()和SetOutput()就可。两个函数的原型是:VARIANT GetInput();及 void SetOutput(const VARIANT& newValue);都要使用VARIANT类型(所有Idispa
8、tch:Invoke的参数和返回值在内部都是作为VARIANT对象处理的)。无论是在PC机读取上传数据时还是在PC机发送下行命令时,我们都习惯于使用字符串的形式(也可以说是数组形式)。查阅VARIANT文档知道,可以用BSTR表示字符串,但遗憾的是所有的BSTR都是包含宽字符,即使我们没有定义_UNICODE_UNICODE也是这样! WinNT支持宽字符, 而Win95并不支持。为解决上述问题,我们在实际工作中使用CbyteArray,给出相应的部分程序如下:void CComDlg:OnComm() / TODO: Add your control notification handler
9、 code hereVARIANT variant_inp; COleSafeArray safearray_inp; LONG len,k; BYTE rxdata2048; CString strtemp; if(m_Com.GetCommEvent()=2) variant_inp=m_Com.GetInput(); safearray_inp=variant_inp; len=safearray_inp.GetOneDimSize(); for(k=0;klen;k+) safearray_inp.GetElement(&k,rxdata+k); for(k=0;kLoadIcon(I
10、DR_MAINFRAME);void CComDlg:DoDataExchange(CDataExchange* pDX)CDialog:DoDataExchange(pDX);DDX_Control(pDX, IDC_MSCOMM2, m_Com);DDX_Text(pDX, IDC_RECV, m_recv);DDX_Text(pDX, IDC_SEND, m_send);BEGIN_MESSAGE_MAP(CComDlg, CDialog)ON_WM_SYSCOMMAND()ON_WM_PAINT()ON_WM_QUERYDRAGICON()ON_BN_CLICKED(IDC_OPENC
11、OM, OnOpencom)ON_BN_CLICKED(IDC_ONSEND, OnOnsend)END_MESSAGE_MAP()/ CComDlg message handlersBOOL CComDlg:OnInitDialog()CDialog:OnInitDialog();ASSERT(IDM_ABOUTBOX & 0xFFF0) = IDM_ABOUTBOX);ASSERT(IDM_ABOUTBOX AppendMenu(MF_SEPARATOR);pSysMenu-AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu);SetIcon(
12、m_hIcon, TRUE);SetIcon(m_hIcon, FALSE);return TRUE; void CComDlg:OnSysCommand(UINT nID, LPARAM lParam)if (nID & 0xFFF0) = IDM_ABOUTBOX)CAboutDlg dlgAbout;dlgAbout.DoModal();elseCDialog:OnSysCommand(nID, lParam);void CComDlg:OnPaint() if (IsIconic()CPaintDC dc(this);SendMessage(WM_ICONERASEBKGND, (WP
13、ARAM) dc.GetSafeHdc(), 0)int cxIcon = GetSystemMetrics(SM_CXICON);int cyIcon = GetSystemMetrics(SM_CYICON);CRect rect;GetClientRect(&rect);int x = (rect.Width() - cxIcon + 1) / 2;int y = (rect.Height() - cyIcon + 1) / 2;dc.DrawIcon(x, y, m_hIcon);elseCDialog:OnPaint();HCURSOR CComDlg:OnQueryDragIcon
14、()return (HCURSOR) m_hIcon;void CComDlg:OnOpencom() if(m_Com.GetPortOpen() /打开通信端口m_Com.SetPortOpen(FALSE);m_Com.SetCommPort(1); /选择com1if( !m_Com.GetPortOpen()m_Com.SetPortOpen(TRUE);/打开串口MessageBox(串口已经打开);elseMessageBox(不能打开串口!);m_Com.SetSettings(9600,n,8,1);m_Com.SetInputMode(1); m_Com.SetRThres
15、hold(1); m_Com.SetInputLen(0); m_Com.GetInput();m_opened=TRUE;BEGIN_EVENTSINK_MAP(CComDlg, CDialog)ON_EVENT(CComDlg, IDC_MSCOMM2, 1 /* OnComm */, OnComm, VTS_NONE)END_EVENTSINK_MAP()void CComDlg:OnComm() VARIANT variant_inp; COleSafeArray safearray_inp; LONG len,k; BYTE rxdata2048; CString strtemp;
16、if(m_Com.GetCommEvent()=2) variant_inp=m_Com.GetInput(); safearray_inp=variant_inp; len=safearray_inp.GetOneDimSize(); for(k=0;klen;k+) safearray_inp.GetElement(&k,rxdata+k); for(k=0;kGetWindowText(m_send);if(m_send!=) UpdateData(TRUE);m_Com.SetOutput(COleVariant(m_send);m_send= ;UpdateData(FALSE);e
17、lseMessageBox(不能发空数据);elseMessageBox(请打开串口);Mscomm.cpp#include stdafx.h#include mscomm.h/ CMSCommIMPLEMENT_DYNCREATE(CMSComm, CWnd)/ CMSComm properties/ CMSComm operationsvoid CMSComm:SetCDHolding(BOOL bNewValue)static BYTE parms =VTS_BOOL;InvokeHelper(0x1, DISPATCH_PROPERTYPUT, VT_EMPTY, NULL, parm
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 利用 MSCOMM 串口 通信 控件 进行 异步 串行 VC 程序设计
限制150内