测试MapWindowGis控件

作者：朱金灿
来源：http://blog.csdn.net/clever101

MapWinGIS是一个著名的开源的ActiveX组件，功能上类似MapX（网上就有人以其代替MapInfo的著名组件MapX）。我用VS C++ 2005编写了一个例程，发现果然不错（开发环境为：VS C++ 2005+sp1，Win XP+sp3）。

首先使用VS C++ 2005新建一个单文档工程：VisualDivision。然后注册MapWinGIS
ActiveX组件。在命令行窗口输入命令：regsvr32 $MapWinGIS.ocx。 (注意：$MapWinGIS.ocx为MapWinGIS.ocx存放的绝对路径，我的为：F:/DevTool/MapWinGIS_SDK/MapWinGIS.ocx。)

接着我们为控件添加相应的类。具体是为项目添加一个ActiveX控件中的MFC类，如下图：

接着在注册表中选择Map Control<1.0>,为接口_DMap一个CGisMap类，具体如下图：

现在我们开始编码：

首先打开stdafx.h ，在其中加入：

#import "../MapWinGIS_SDK/MapWinGIS.ocx" rename_namespace("mapWindow") rename("GetObject", "GISGetObject")

在Resource.h中为即将新建的地图窗口添加一个资源ID：

 #define IDC_MAP				140

在视图类添加一个CGisMap的私有变量：

 CGisMap m_Map;

添加视图类的WM_CREATE消息的响应函数，动态创建地图窗口，具体代码如下：

int CVisualDivisionView::OnCreate(LPCREATESTRUCT lpCreateStruct)
{
	if (CView::OnCreate(lpCreateStruct) == -1)
		return -1;
	// TODO:  在此添加您专用的创建代码
	CRect rcmap;
	GetClientRect(rcmap);
	m_Map.Create(NULL,WS_CHILD|WS_VISIBLE|WS_BORDER,rcmap,this,IDC_MAP);
	return 0;
}

添加视图类的WM_SIZE消息的响应函数，加入如下代码以使地图控件占满整个视图：

    void CVisualDivisionView::OnSize(UINT nType, int cx, int cy)
{
	CView::OnSize(nType, cx, cy);
	// TODO: 在此处添加消息处理程序代码
	if(m_Map.m_hWnd == NULL)
		    return;   
	if(IsWindow(m_Map.m_hWnd))
	{
		CRect rc;
		this->GetClientRect(&rc);
		m_Map.MoveWindow(&rc,FALSE);      
		m_Map.ZoomToPrev(); 
	}         
}

下面我们实现一个简单的功能：打开一个tif图像或者shp文件进行显示。首先在视图类为菜单"打开"添加一个命令消息函数：OnFileOpen，接着在视图类添加一个CString类型的私有变量m_strFilePath用于保存tif图像或者shp文件的路径：

	CString m_strFilePath;

OnFileOpen函数的代码如下：

void CVisualDivisionView::OnFileOpen()
{
	// TODO: 在此添加命令处理程序代码
	TCHAR szFilters[]= _T("TIFF Files (*.tif)|*.tif|SHP Files (*.shp)|*.shp||");


	CFileDialog fileDlg (TRUE,_T("tif"),_T("*.tif"),
		OFN_FILEMUSTEXIST| OFN_HIDEREADONLY, szFilters, this);

	if( fileDlg.DoModal ()==IDOK )
	{
		m_strFilePath = fileDlg.GetPathName();


		if (_T("")!=m_strFilePath)
		{

			// 先删除所有图层
			m_Map.RemoveAllLayers();

			// 获取后缀名判断文件是tif图像还是shp文件
			CString strExt = m_strFilePath.Right(3);
			if (_T("tif")==strExt)
		 {
			 // 创建图像接口打开图像加入地图
			 mapWindow::IImagePtr pImage;
			 pImage.CreateInstance(__uuidof(mapWindow::Image));
			 pImage->Open(_bstr_t(m_strFilePath),mapWindow::USE_FILE_EXTENSION,TRUE,NULL);
			 m_Map.AddLayer(pImage,true);
		 }
			else if (_T("shp")==strExt)
		 {
			 // 创建shp接口打开shp文件加入地图
			 mapWindow::IShapefilePtr pShapefilebound;
			 pShapefilebound.CreateInstance(__uuidof(mapWindow::Shapefile));
			 pShapefilebound->Open(_bstr_t(m_strFilePath),false);

			 m_Map.AddLayer(pShapefilebound,true);
		 }

		}
		// 发送视图重绘消息
		Invalidate();
	}

}

程序效果图如下：

打开tif图像：

打开shp文件：

测试代码已经上传到程序员联合开发网，其中有包含了ocx控件在内的MapWinGIS_SDK以及ocx控件的两本使用手册。下载页面为：
http://www.pudn.com/downloads225/sourcecode/windows/detail1058373.html

参考文献：

在vc++6.0平台注册、加载MapWinGis

代码修改记录：

2010年2月4日遵照hoodlum1980大虾的意见对打开图像和shp文件的代码作了修改。