测试MapWindowGis控件

作者:朱金灿

来源:http://www.cnblogs.com/clever101

 

 

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

 

     首先使用VS C++ 2005新建一个单文档工程:VisualDivision。然后注册MapWinGIS

ActiveX组件。在命令行窗口输入命令:regsvr32 $MapWinGIS.ocx (注意:$MapWinGIS.ocxMapWinGIS.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

 

参考文献:

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


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

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

posted @ 2010-02-03 22:37  是金子就会灿烂  阅读(3271)  评论(5编辑  收藏  举报