转:ArcEngine10.0+VS2010+MFC 扫盲贴 .
项目用vc6.0+MapObject写的,现在却要升级成AE10,研究了好多天的AE10.0和c++,中间的曲折也不想多说了,废话少数,下面是实现ArcEngine基本功能的,仅供参考,如能帮到同仁们,那就很欣慰了。
前提:已经安装了ArcGIS10.0,ArcEngine10.0 C++开发包,已经安装了vs2010,win7 32位(64位暂未验证)
总的来说分为如下几步:
1.引入库文件
2.加入地图控件
3.将地图控件和成员变量绑定
4.初始化许可
5.加载数据
6.添加功能
1.首先请建立一个MFC的工程,这里选择在左侧已安装的模板的visual C++下的MFC,这里取工程名字叫1111,应用程序类型单文档和多文档都没有区别,但是在生成的类中基类要选择“CFormView”。点击完成。然后是在stdafx.h中引入库文件。
请将下面的代码原封不动的粘贴到stdafx.h的最后面
- #pragma warning(push)
- #pragma warning(disable : 4192) /* Ignore warnings for types that are duplicated in win32 header files */
- #pragma warning(disable : 4146) /* Ignore warnings for use of minus on unsigned types */
- #import "libid:6FCCEDE0-179D-4D12-B586-58C88D26CA78" raw_interfaces_only no_implementation
- #import "D:\Program Files\ArcGIS\Desktop10.0\com\esriSystem.olb" raw_interfaces_only, raw_native_types, no_namespace, named_guids, exclude("OLE_COLOR", "OLE_HANDLE", "VARTYPE") rename("min", "esriMin") rename("max", "esriMax")
- #import "D:\Program Files\ArcGIS\Desktop10.0\com\esriSystemUI.olb" raw_interfaces_only, raw_native_types, no_namespace, named_guids,exclude("OLE_COLOR",/*"ICommand",*/"IProgressDialog") rename("ICommand", "esriICommand")
- #import "D:\Program Files\ArcGIS\Desktop10.0\com\esriControls.olb" raw_interfaces_only, raw_native_types, no_namespace, named_guids
- #import "D:\Program Files\ArcGIS\Desktop10.0\com\esriGeometry.olb" raw_interfaces_only, raw_native_types, no_namespace, named_guids,exclude("OLE_COLOR")
- #import "D:\Program Files\ArcGIS\Desktop10.0\com\esriDisplay.olb" raw_interfaces_only, raw_native_types, no_namespace, named_guids,exclude("OLE_COLOR") rename("RGB", "esriRGB") rename("CMYK", "esriCMYK") rename("ResetDC", "esriResetDC") rename("GetMessage", "esriGetMessage")
- #import "D:\Program Files\ArcGIS\Desktop10.0\com\esriOutput.olb" raw_interfaces_only, raw_native_types, no_namespace, named_guids,exclude("OLE_COLOR")
- #import "D:\Program Files\ArcGIS\Desktop10.0\com\esriGeoDatabase.olb" raw_interfaces_only, raw_native_types, no_namespace, named_guids,exclude("OLE_COLOR"/*,"ICursor"*/), rename("GetMessage", "esriGetMessage") ,rename("ICursor", "esriICursor"),rename("IRow", "esriIRow")
- #import "D:\Program Files\ArcGIS\Desktop10.0\com\esriDataSourcesFile.olb" raw_interfaces_only, raw_native_types, no_namespace, named_guids
- #import "D:\Program Files\ArcGIS\Desktop10.0\com\esriDataSourcesRaster.olb" raw_interfaces_only, raw_native_types, no_namespace, named_guids,exclude("OLE_COLOR"/*,"IWorkspaceFactory","IWorkspace"*/)
- #import "D:\Program Files\ArcGIS\Desktop10.0\com\esriCarto.olb" raw_interfaces_only, raw_native_types, no_namespace, named_guids,exclude("OLE_COLOR","UINT_PTR") rename("ITableDefinition","esriITableDefinition")
- #pragma warning(pop)
#pragma warning(push) #pragma warning(disable : 4192) /* Ignore warnings for types that are duplicated in win32 header files */ #pragma warning(disable : 4146) /* Ignore warnings for use of minus on unsigned types */ #import "libid:6FCCEDE0-179D-4D12-B586-58C88D26CA78" raw_interfaces_only no_implementation #import "D:\Program Files\ArcGIS\Desktop10.0\com\esriSystem.olb" raw_interfaces_only, raw_native_types, no_namespace, named_guids, exclude("OLE_COLOR", "OLE_HANDLE", "VARTYPE") rename("min", "esriMin") rename("max", "esriMax") #import "D:\Program Files\ArcGIS\Desktop10.0\com\esriSystemUI.olb" raw_interfaces_only, raw_native_types, no_namespace, named_guids,exclude("OLE_COLOR",/*"ICommand",*/"IProgressDialog") rename("ICommand", "esriICommand") #import "D:\Program Files\ArcGIS\Desktop10.0\com\esriControls.olb" raw_interfaces_only, raw_native_types, no_namespace, named_guids #import "D:\Program Files\ArcGIS\Desktop10.0\com\esriGeometry.olb" raw_interfaces_only, raw_native_types, no_namespace, named_guids,exclude("OLE_COLOR") #import "D:\Program Files\ArcGIS\Desktop10.0\com\esriDisplay.olb" raw_interfaces_only, raw_native_types, no_namespace, named_guids,exclude("OLE_COLOR") rename("RGB", "esriRGB") rename("CMYK", "esriCMYK") rename("ResetDC", "esriResetDC") rename("GetMessage", "esriGetMessage") #import "D:\Program Files\ArcGIS\Desktop10.0\com\esriOutput.olb" raw_interfaces_only, raw_native_types, no_namespace, named_guids,exclude("OLE_COLOR") #import "D:\Program Files\ArcGIS\Desktop10.0\com\esriGeoDatabase.olb" raw_interfaces_only, raw_native_types, no_namespace, named_guids,exclude("OLE_COLOR"/*,"ICursor"*/), rename("GetMessage", "esriGetMessage") ,rename("ICursor", "esriICursor"),rename("IRow", "esriIRow") #import "D:\Program Files\ArcGIS\Desktop10.0\com\esriDataSourcesFile.olb" raw_interfaces_only, raw_native_types, no_namespace, named_guids #import "D:\Program Files\ArcGIS\Desktop10.0\com\esriDataSourcesRaster.olb" raw_interfaces_only, raw_native_types, no_namespace, named_guids,exclude("OLE_COLOR"/*,"IWorkspaceFactory","IWorkspace"*/) #import "D:\Program Files\ArcGIS\Desktop10.0\com\esriCarto.olb" raw_interfaces_only, raw_native_types, no_namespace, named_guids,exclude("OLE_COLOR","UINT_PTR") rename("ITableDefinition","esriITableDefinition") #pragma warning(pop)
修改下:导入库文件时,不要排除IRow和ITableDefinition,而是重命名(比如esriIRow),不然会有很多不必要的麻烦,比如选择集取属性值出错等
注意:
(1)头三行和最后一行是忽略一些不必要的警告
(2)第四行一定要有,从esri官网上抄下来的,作用暂时不明确
(3)这里引入库文件的地址是绝对地址,我的ArcGIS安装在D盘,请改成对应的安装盘,也可以把*.olb文件取出来改成相对地址,随便。
(4)类似于rename("ICommand", "esriICommand")这样的语句,是因为esri的关键字与MFC的关键字冲突了,重命名下,在代码中使用AE的关键字的时候,也用已经重命名的关键字
(5)类似于exclude("OLE_COLOR"),是因为MFC中已经有了这样的类,不需要再导入了
(6)导入这些库文件是有前后顺序的,关于导入的顺序,请参开esri官网,地址如下
http://help.arcgis.com/en/sdk/10.0/arcobjects_cpp/componenthelp/index.html#//000200000001000000
这里有顺序的说明和大部分库文件的部分作用描述
2.引入了库文件,接下来加入地图控件。
请在类视图中找到CMy1111View,然后右键“转到对话框视图“,然后从左侧工具箱中拖一个ESRI MapControl到视图框中,如果没有ESRI的控件,请先右键建立一个选项卡,取名ESRI,然后右键选择项-COM组件选项卡,选择ESRI MapControl,OK。如下图:
3.将地图控件和成员变量绑定
首先请在CMy1111View类头文件中添加一个成员变量如下
IMapControl2Ptr m_ipMapControl;/*指向当前地图文档的指针*/
然后给这个类添加虚函数OnDraw(),然后再OnDraw函数中使用如下几句关联控件和成员变量
- void CMy1111View::OnDraw(CDC* /*pDC*/)
- {
- // TODO: 在此添加专用代码和/或调用基类
- //关联控件代码
- CWnd * pWndCal = GetDlgItem(IDC_MAPCONTROL1);
- LPUNKNOWN pUnk = pWndCal ->GetControlUnknown( );
- pUnk->QueryInterface( IID_IMapControl2, (LPVOID *)& m_ipMapControl );
- }
void CMy1111View::OnDraw(CDC* /*pDC*/) { // TODO: 在此添加专用代码和/或调用基类 //关联控件代码 CWnd * pWndCal = GetDlgItem(IDC_MAPCONTROL1); LPUNKNOWN pUnk = pWndCal ->GetControlUnknown( ); pUnk->QueryInterface( IID_IMapControl2, (LPVOID *)& m_ipMapControl ); }
4.接下来我们初始化许可
请给CMy1111View类添加消息WM_CREATE,生成OnCreate()函数,然后再OnCreate()函数中添加如下代码初始化AE许可
- int CMy1111View::OnCreate(LPCREATESTRUCT lpCreateStruct)
- {
- if (CFormView::OnCreate(lpCreateStruct) == -1)
- return -1;
- // TODO: 在此添加您专用的创建代码
- //初始化Engine许可
- ::CoInitialize(NULL);
- ArcGISVersionLib::IArcGISVersionPtr ipVer(__uuidof(ArcGISVersionLib::VersionManager));
- VARIANT_BOOL succeeded;
- if (FAILED(ipVer->LoadVersion(ArcGISVersionLib::esriArcGISDesktop , L"10.1",&succeeded)))
- return -1;
- IAoInitializePtr m_AoInit;//(CLSID_AoInitialize);
- m_AoInit.CreateInstance (CLSID_AoInitialize);
- esriLicenseStatus ls;
- HRESULT h= m_AoInit->Initialize(esriLicenseProductCode::esriLicenseProductCodeEngineGeoDB ,&ls);
- return 0;
- }
int CMy1111View::OnCreate(LPCREATESTRUCT lpCreateStruct) { if (CFormView::OnCreate(lpCreateStruct) == -1) return -1; // TODO: 在此添加您专用的创建代码 //初始化Engine许可 ::CoInitialize(NULL); ArcGISVersionLib::IArcGISVersionPtr ipVer(__uuidof(ArcGISVersionLib::VersionManager)); VARIANT_BOOL succeeded; if (FAILED(ipVer->LoadVersion(ArcGISVersionLib::esriArcGISDesktop , L"10.0",&succeeded))) return -1; IAoInitializePtr m_AoInit;//(CLSID_AoInitialize); m_AoInit.CreateInstance (CLSID_AoInitialize); esriLicenseStatus ls; HRESULT h= m_AoInit->Initialize(esriLicenseProductCode::esriLicenseProductCodeEngineGeoDB ,&ls); return 0; }
5.加载数据
我们通过重载MFC的打开按钮来实现。给ID_FILE_OPEN添加消息响应,然后在OnFileOpen()函数中实现数据的加载。
在这里我们通过调用自定义添加的函数LoadData()来实现。函数如下:
- void CAEMFCRibbonView::LoadData(/*CString strFileName*/)
- {
- //char sfileter[]="Shape files(*.Shp)|*.Shp|mxd文档(*.mxd)|*.mxd|所有文件(*.*)";
- CFileDialog dlg(TRUE, //TRUE为OPEN对话框,FALSE为SAVE AS对话框
- NULL,
- NULL,
- OFN_HIDEREADONLY | OFN_OVERWRITEPROMPT,
- (LPCTSTR)_TEXT("所有文件|*.*|mxd文档(*.mxd)|*.mxd|Shape files(*.shp)|*.shp|"),
- NULL);
- CString m_strFileName;
- if(dlg.DoModal()==IDOK)
- {
- //m_MapControl=new CMapControl2();
- m_strFileName=dlg.GetPathName();//全路径名
- //CString filepath=dlg.GetFolderPath();//路径名称,不带文件名
- //CString filename=dlg.GetFileName();//文件名,不带路径
- CString strExt = dlg.GetFileExt();//后缀名,不带点
- if (strExt=="shp")
- {
- CComBSTR MX_DATAFILE;
- //MX_DATAFILE = "F:\\测试mxd文档\\shenzhen.mxd" ;
- MX_DATAFILE=dlg.GetPathName();
- BSTR filePath=dlg.GetFolderPath().AllocSysString();
- BSTR fileName=dlg.GetFileName().AllocSysString();
- m_ipMapControl->AddShapeFile(filePath,fileName);
- }
- else if(strExt=="mxd")
- {
- CComBSTR MX_DATAFILE;
- //MX_DATAFILE = "F:\\测试mxd文档\\shenzhen.mxd" ;
- MX_DATAFILE=dlg.GetPathName();
- VARIANT_BOOL bValidDoc;
- //m_MapControlView.CheckMxFile( MX_DATAFILE );
- m_ipMapControl->CheckMxFile( MX_DATAFILE, & bValidDoc );
- //VARIANT vt = 0;
- if (bValidDoc)
- m_ipMapControl->LoadMxFile(MX_DATAFILE);
- }
- else
- {
- AfxMessageBox(_T("请选择合适的文件!"));
- return;
- }
- m_ipMapControl->Refresh(esriViewAll);
- }
- }
void CAEMFCRibbonView::LoadData(/*CString strFileName*/) { //char sfileter[]="Shape files(*.Shp)|*.Shp|mxd文档(*.mxd)|*.mxd|所有文件(*.*)"; CFileDialog dlg(TRUE, //TRUE为OPEN对话框,FALSE为SAVE AS对话框 NULL, NULL, OFN_HIDEREADONLY | OFN_OVERWRITEPROMPT, (LPCTSTR)_TEXT("所有文件|*.*|mxd文档(*.mxd)|*.mxd|Shape files(*.shp)|*.shp|"), NULL); CString m_strFileName; if(dlg.DoModal()==IDOK) { //m_MapControl=new CMapControl2(); m_strFileName=dlg.GetPathName();//全路径名 //CString filepath=dlg.GetFolderPath();//路径名称,不带文件名 //CString filename=dlg.GetFileName();//文件名,不带路径 CString strExt = dlg.GetFileExt();//后缀名,不带点 if (strExt=="shp") { CComBSTR MX_DATAFILE; //MX_DATAFILE = "F:\\测试mxd文档\\shenzhen.mxd" ; MX_DATAFILE=dlg.GetPathName(); BSTR filePath=dlg.GetFolderPath().AllocSysString(); BSTR fileName=dlg.GetFileName().AllocSysString(); m_ipMapControl->AddShapeFile(filePath,fileName); } else if(strExt=="mxd") { CComBSTR MX_DATAFILE; //MX_DATAFILE = "F:\\测试mxd文档\\shenzhen.mxd" ; MX_DATAFILE=dlg.GetPathName(); VARIANT_BOOL bValidDoc; //m_MapControlView.CheckMxFile( MX_DATAFILE ); m_ipMapControl->CheckMxFile( MX_DATAFILE, & bValidDoc ); //VARIANT vt = 0; if (bValidDoc) m_ipMapControl->LoadMxFile(MX_DATAFILE); } else { AfxMessageBox(_T("请选择合适的文件!")); return; } m_ipMapControl->Refresh(esriViewAll); } }
运行程序已经可以看到地图控件,点击打开文件按钮,选择一个shp文件,确定,效果如下:
这个时候地图控件还没有充满整个客户区屏幕,我们添加WM_SIZE消息响应,并添加如下代码,就能自动调整尺寸了。
- void CAEMFCRibbonView::OnSize(UINT nType, int cx, int cy)
- {
- CFormView::OnSize(nType, cx, cy);
- // TODO: 在此处添加消息处理程序代码
- CWnd *pMapCtl = GetDlgItem( IDC_MAPCONTROL1 );
- //CRect MapCtlrect;
- if ( pMapCtl )
- {
- //pMapCtl->GetWindowRect( &MapCtlrect );
- pMapCtl->MoveWindow( 0,0, cx, cy );
- }
- }
void CAEMFCRibbonView::OnSize(UINT nType, int cx, int cy) { CFormView::OnSize(nType, cx, cy); // TODO: 在此处添加消息处理程序代码 CWnd *pMapCtl = GetDlgItem( IDC_MAPCONTROL1 ); //CRect MapCtlrect; if ( pMapCtl ) { //pMapCtl->GetWindowRect( &MapCtlrect ); pMapCtl->MoveWindow( 0,0, cx, cy ); } }
先到这里,下午再来更新添加自定义的放大缩小等地图工具和取属性等。