【原】ArcEngine鹰眼的实现

最新推荐文章于 2023-10-05 20:06:43 发布
最新推荐文章于 2023-10-05 20:06:43 发布
阅读量225 收藏
点赞数
原文链接：http://www.cnblogs.com/miao2009/archive/2009/04/12/ae_eagleeye.html
版权

      大家都用过百度地图或者googole地图吧，在它们主地图的右下角，有个小地图窗口，这就是鹰眼窗口。用鼠标拖动鹰眼里的小窗口，则主地图便移动到相应的位置。下面就介绍鹰眼的实现。
      鹰眼和主地图的互动，主要体现在两个方面：一是主地图的地图改变了，则鹰眼里的矩形框要移动到对应的位置，以指示当前地图在整个地图中的位置；二是鹰眼的矩形框移动了，则主地图中显示的地图要移动到相应的位置。
      ArcEngine中显示地图的控件叫 ESRI MapControl，这里主要用到了它的OnAfterDraw事件。在主地图的OnAfterDrawMapControl事件中，根据当前地图的大小，改变鹰眼中矩形框的大小；在鹰眼的OnAfterDraw事件中，根据矩形框的位置，确定主地图中地图的位置。google地图的鹰眼还实现了矩形框的拖动，这个也很好实现，呵呵。在鼠标点击到鹰眼控件时，先判断是否在矩形框内，如果在的话，用一个状态量记住这个状态，此时如果鼠标移动，则矩形框跟着相应的移动；若不在矩形框内，则矩形框移动到鼠标点击的位置。下面的代码是基于VC6和ArcEngine9.2实现的。鹰眼矩形框的拖动涉及到的事件比较多，包括OnMouseDownMapControl、OnMouseMoveMapControl、OnMouseUpMapControl事件。

 

ContractedBlock.gif ExpandedBlockStart.gif Code
  1
  2class CEagleEyeCtrl : public CStatic
  3ExpandedBlockStart.gifContractedBlock.gif{
  4// Construction
  5public:
  6    CEagleEyeCtrl();
  7    CMapControlDefault m_MapCtrl;
  8    IFillShapeElementPtr m_ipFillShapeElement;
  9    IEnvelopePtr m_ipLastEnvelope;
 10    IPointPtr m_ipPoint;
 11    int m_nAction;
 12    BOOL m_bDrag;                                // 红框拖动的标记
 13    BOOL m_bDragWnd;                            // 拖动整个鹰眼窗口
 14    BOOL m_bShow;
 15    CPoint m_point;                                // 鼠标上一次左键按下的屏幕坐标 
 16    afx_msg void OnMouseDownMapcontrol(long button, long shift, long X, long Y, double mapX, double mapY);
 17    afx_msg void OnMouseMoveMapcontrol(long button, long shift, long X, long Y, double mapX, double mapY);
 18    afx_msg void OnMouseUpMapcontrol(long button, long shift, long X, long Y, double mapX, double mapY);
 19    afx_msg void OnAfterDrawMapcontrol(const VARIANT FAR& Display, long viewDrawPhase);
 20    DECLARE_EVENTSINK_MAP()
 21    DECLARE_MESSAGE_MAP()
 22};
 23
 24void CEagleEyeCtrl::OnMouseDownMapcontrol(long button, long shift, long X,
 25                                            long Y, double mapX, double mapY) 
 26ExpandedBlockStart.gifContractedBlock.gif{
 27    // TODO: Add your control notification handler code here
 28    IActiveViewPtr ipActiveView;
 29    ipActiveView = m_MapCtrl.GetActiveView();
 30    if (ipActiveView == NULL)
 31ExpandedSubBlockStart.gifContractedSubBlock.gif    {
 32        return ;
 33    }
 34    
 35    IPointPtr ipPoint(CLSID_Point);
 36    IRgbColorPtr ipRgbColor(CLSID_RgbColor);
 37    
 38    HRESULT hr = ipPoint->PutCoords(mapX, mapY);
 39    hr = ipRgbColor->put_RGB((OLE_COLOR)RGB(255, 0, 0));
 40    ASSERT(SUCCEEDED(hr));
 41    
 42    IGraphicsContainerPtr ipGraphicsContainer;
 43    ipActiveView->get_GraphicsContainer(&ipGraphicsContainer);
 44    
 45    // 添加矩形
 46    IEnvelopePtr ipEnvelope(CLSID_Envelope);
 47    ipEnvelope->put_XMax(mapX + 0.0005);
 48    ipEnvelope->put_XMin(mapX - 0.0005);
 49    ipEnvelope->put_YMax(mapY + 0.0003);
 50    ipEnvelope->put_YMin(mapY - 0.0003);
 51    IRectangleElementPtr ipRectangleElement(CLSID_RectangleElement);
 52    ISimpleFillSymbolPtr ipSimpleFillSymbol(CLSID_SimpleFillSymbol);
 53    ISimpleLineSymbolPtr ipSimpleLineSymbol(CLSID_SimpleLineSymbol);
 54    ipSimpleFillSymbol->put_Style(esriSFSHollow);
 55    ipSimpleLineSymbol->put_Color(ipRgbColor);
 56    ipSimpleLineSymbol->put_Style(esriSLSSolid);
 57    ipSimpleLineSymbol->put_Width(1.8);
 58    ipSimpleFillSymbol->put_Outline(ipSimpleLineSymbol);
 59    
 60    IElementPtr ipElement = ipRectangleElement;
 61    ipElement->put_Geometry(ipEnvelope);
 62    if (m_ipFillShapeElement != NULL)
 63ExpandedSubBlockStart.gifContractedSubBlock.gif    {
 64        IElementPtr ipTempElement = m_ipFillShapeElement;
 65        IGeometryPtr ipGeometry = NULL;
 66        ipTempElement->get_Geometry(&ipGeometry);
 67        esriGeometryType esriType = esriGeometryNull;
 68        ipGeometry->get_GeometryType(&esriType);
 69        ASSERT(esriType == esriGeometryPolygon);
 70        IEnvelopePtr ipEnvelope2 = NULL;
 71        IPolygonPtr ipPolygon = ipGeometry;
 72        hr = ipPolygon->get_Envelope(&ipEnvelope2);
 73        ASSERT(ipEnvelope2 != NULL);
 74        double xMin = 0.0;
 75        double xMax = 0.0;
 76        double yMin = 0.0;
 77        double yMax = 0.0;
 78        ipEnvelope2->QueryCoords(&xMin, &yMin, &xMax, &yMax);
 79        if (mapX >= xMin && mapX <= xMax && mapY >= yMin && mapY <= yMax)
 80ExpandedSubBlockStart.gifContractedSubBlock.gif        {
 81            m_bDrag = TRUE;
 82        }
 83        else
 84ExpandedSubBlockStart.gifContractedSubBlock.gif        {
 85            m_bDrag = FALSE;
 86        }
 87    }
 88}
 89
 90void CEagleEyeCtrl::OnMouseMoveMapcontrol(long button, long shift, long X,
 91                                            long Y, double mapX, double mapY) 
 92ExpandedBlockStart.gifContractedBlock.gif{
 93    // TODO: Add your control notification handler code here
 94     if (m_bDrag)
 95ExpandedSubBlockStart.gifContractedSubBlock.gif    {
 96         if (m_ipFillShapeElement != NULL)
 97ExpandedSubBlockStart.gifContractedSubBlock.gif        {
 98            IActiveViewPtr ipActiveView = m_MapCtrl.GetActiveView();
 99            if (ipActiveView == NULL || m_ipFillShapeElement == NULL)
100ExpandedSubBlockStart.gifContractedSubBlock.gif            {
101                return;
102            }
103            IGraphicsContainerPtr ipGraphicsContainer = NULL;
104            HRESULT hr = ipActiveView->get_GraphicsContainer(&ipGraphicsContainer);
105            IRgbColorPtr ipRgbColor(CLSID_RgbColor);
106            
107            IElementPtr ipElement = m_ipFillShapeElement;
108            IGeometryPtr ipGeometry = NULL;
109            hr = ipElement->get_Geometry(&ipGeometry);
110            esriGeometryType esriType = esriGeometryNull;
111            ipGeometry->get_GeometryType(&esriType);
112            ASSERT(esriType == esriGeometryPolygon);
113            IEnvelopePtr ipEnvelope(CLSID_Envelope);
114            IPolygonPtr ipPolygon = ipGeometry;
115            hr = ipPolygon->get_Envelope(&ipEnvelope);
116            
117            IPointPtr ipPoint(CLSID_Point);
118            ipPoint->PutCoords(mapX, mapY);
119            ipEnvelope->CenterAt(ipPoint);
120            m_ipLastEnvelope = ipEnvelope;
121            IEnvelopePtr ipEnvelope2 = m_MapCtrl.GetExtent();
122            ipActiveView->PartialRefresh(esriViewForeground, NULL, ipEnvelope2);
123        }
124    }
125}
126
127void CEagleEyeCtrl::OnMouseUpMapcontrol(long button, long shift, long X,
128                                          long Y, double mapX, double mapY) 
129ExpandedBlockStart.gifContractedBlock.gif{
130    // TODO: Add your control notification handler code here
131    m_bDrag = FALSE;
132    
133    IActiveViewPtr ipActiveView = m_MapCtrl.GetActiveView();
134    if (ipActiveView == NULL || m_ipFillShapeElement == NULL)
135ExpandedSubBlockStart.gifContractedSubBlock.gif    {
136        return;
137    }
138    if (m_ipLastEnvelope != NULL)
139ExpandedSubBlockStart.gifContractedSubBlock.gif    {
140        m_ipLastEnvelope = NULL;
141    }
142    IGraphicsContainerPtr ipGraphicsContainer = NULL;
143    HRESULT hr = ipActiveView->get_GraphicsContainer(&ipGraphicsContainer);
144    IElementPtr ipElement = m_ipFillShapeElement;
145    IGeometryPtr ipGeometry = NULL;
146    ipElement->get_Geometry(&ipGeometry);
147    esriGeometryType esriType;
148    ipGeometry->get_GeometryType(&esriType);
149    ASSERT(esriType == esriGeometryPolygon);
150    IPolygonPtr ipPolygon = ipGeometry;
151    IEnvelopePtr ipEnvelope = NULL;
152    ipPolygon->get_Envelope(&ipEnvelope);
153    IPointPtr ipPoint(CLSID_Point);
154    ipPoint->PutCoords(mapX, mapY);
155    ipEnvelope->CenterAt(ipPoint);
156    ipElement->put_Geometry(ipEnvelope);
157    m_ipFillShapeElement = ipElement;
158    ipGraphicsContainer->UpdateElement((IElementPtr)m_ipFillShapeElement);
159     ipActiveView->Refresh();    
160    // 给父控件发消息，切换视图
161    m_ipPoint = ipPoint;
162    GetParent()->GetParent()->SendMessage(WMU_GIS_EAGLE_NOTIFY, 0, 0);
163}
164
165
166void CEagleEyeCtrl::OnAfterDrawMapcontrol(const VARIANT FAR& Display,
167                                            long viewDrawPhase) 
168ExpandedBlockStart.gifContractedBlock.gif{
169    // TODO: Add your control notification handler code here
170    if (m_ipLastEnvelope != NULL && m_bDrag)
171ExpandedSubBlockStart.gifContractedSubBlock.gif    {
172        if (m_ipFillShapeElement != NULL)
173ExpandedSubBlockStart.gifContractedSubBlock.gif        {
174            IActiveViewPtr ipActiveView = m_MapCtrl.GetActiveView();
175            if (ipActiveView == NULL || m_ipFillShapeElement == NULL)
176ExpandedSubBlockStart.gifContractedSubBlock.gif            {
177                return;
178            }
179            
180            IElementPtr ipElement = m_ipFillShapeElement;
181            IGeometryPtr ipGeometry = NULL;
182            ipElement->get_Geometry(&ipGeometry);
183            esriGeometryType esriType = esriGeometryNull;
184            ipGeometry->get_GeometryType(&esriType);
185            ASSERT(esriType == esriGeometryPolygon);
186            IEnvelopePtr ipEnvelope(CLSID_Envelope);
187            IPolygonPtr ipPolygon = ipGeometry;
188            ipPolygon->get_Envelope(&ipEnvelope);
189            
190            CPoint pt;
191            GetCursorPos(&pt);
192            m_MapCtrl.ScreenToClient(&pt);
193            IPointPtr ipPoint = m_MapCtrl.ToMapPoint(pt.x, pt.y);
194            ipEnvelope->CenterAt(ipPoint);
195            
196            ISimpleFillSymbolPtr ipSimpleFillSymbol(CLSID_SimpleFillSymbol);
197            ISimpleLineSymbolPtr ipSimpleLineSymbol(CLSID_SimpleLineSymbol);
198            IRgbColorPtr ipRgbColor(CLSID_RgbColor);
199            HRESULT hr = ipRgbColor->put_RGB((OLE_COLOR)RGB(255, 0, 0));
200            ASSERT(SUCCEEDED(hr));
201            ipSimpleFillSymbol->put_Style(esriSFSHollow);
202            ipSimpleLineSymbol->put_Color(ipRgbColor);
203            ipSimpleLineSymbol->put_Style(esriSLSSolid);
204            ipSimpleLineSymbol->put_Width(1.8);
205            ipSimpleFillSymbol->put_Outline(ipSimpleLineSymbol);
206            
207            IScreenDisplayPtr ipScreenDisplay = NULL;
208            OLE_HANDLE hDC = NULL;
209            hr = ipActiveView->get_ScreenDisplay(&ipScreenDisplay);
210            ASSERT(SUCCEEDED(hr));
211            hr = ipScreenDisplay->get_hDC(&hDC);
212            ASSERT(SUCCEEDED(hr));
213            
214            hr = ipScreenDisplay->StartDrawing(hDC, -1);
215            ASSERT(SUCCEEDED(hr));
216            hr = ipScreenDisplay->SetSymbol((ISymbolPtr)ipSimpleFillSymbol);
217            ASSERT(SUCCEEDED(hr));
218            hr = ipScreenDisplay->DrawRectangle(ipEnvelope);
219            ASSERT(SUCCEEDED(hr));
220            hr = ipScreenDisplay->FinishDrawing();    
221        }
222    }
223}

 

转载于:https://www.cnblogs.com/miao2009/archive/2009/04/12/ae_eagleeye.html

weixin_30703911
关注
  • 0
    点赞
  • 踩
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
ArcEngine 鹰眼功能C#实现
Sean
05-08 1万+
ArcEngine开发之鹰眼功能C#实现        鹰眼作为AE系统一项基本功能，经常见于AE开发中。网上鹰眼功能实现大同小异，本文所写示例仅作参考及记录。        一、效果图               二、控件说明        基本AE框架，包括菜单（MenuStrip）、工具栏（AxToolbarControl）、图层目录（AxTOCControl）、数据视图（axMa
ArcEngine开发鹰眼功能C#实现
05-08
首先，要实现鹰眼功能，我们需要了解ArcEngine的基本架构。ArcEngine的核心组件包括ArcObjects，这是一个全面的COM（组件对象模型）库，包含了处理地图、图层、几何对象等所有GIS操作的接口。C#作为.NET Framework的...
ArcEngine实现鹰眼功能
05-27
ArcEngine+C# 实现鹰眼功能 插件式DLL，使用方便，直接调用 ===========================调用步骤================================== 1.把ESRI2.Map.EagleEye.dll添加到项目引用里 2.鹰眼调用接口： void ESRI2.Map.EagleEye.GetEvent(AxMapControl tMapControl, AxMapControl tMapControlEagleEye); 参数说明： 参数1：tMapControl ESRI.ArcGIS.Controls.AxMapControl类型 接收主地图控件 参数2：tMapControlEagleEye ESRI.ArcGIS.Controls.AxMapControl类型 接收鹰眼地图控件 3.实现方法： 在Load里调用方法ESRI2.Map.EagleEye.GetEvent传入对应参数即可。 =====================================================================
ArcEngine中鹰眼实现
09-27 1339
private void axMapControl1_OnMapReplaced_1(object sender, ESRI.ArcGIS.Controls.IMapControlEvents2_OnMapReplacedEvent e) { this.axMapControl2.Map = new MapClass(); for ...
一起学习ArcEngine（8）鹰眼
weixin_30292843的博客
09-28 143
ae的官方类库没有提供该控件，需要自己实现，不过也比较简单，原理或实现的思路是，另外增加一个axMapControl控件，把他的视图设为地图的全图范围，把当前地图的范围，在这个地图控件上用红色框画出来即可。 首先新建一个用户控件，名称设为MapEagle，在控件上拖拽一个axmapcontrol控件，名称设为axMapEagle ，用来显示地图。 接下来，增加一个自定义属性，用来和地图主窗口关...
ArcEngine9.3的鹰眼实现
丛晓男
06-18 2262
arcgisengine9.3，鹰眼，UpdateExtent
arcengine鹰眼的实现
05-20
在实现鹰眼时，我们需要创建两个MapControl对象：一个用于主地图，另一个用于鹰眼。主地图会加载完整的数据和视图，而鹰眼MapControl则展示一个缩小版的主地图。 实现步骤如下： 1. 初始化ArcEngine：在应用程序...
ArcEngine+C#鹰眼实现
01-03
在本文中，我们将深入探讨如何使用ArcEngine结合C#编程语言来实现“鹰眼”功能。ArcEngine是Esri公司提供的一个强大的GIS开发平台，它允许开发者构建地理信息系统（GIS）应用程序，支持多种数据格式，如TXT、MXD、...
shuiziyuan.rar_arcengine _鹰眼
09-20
这表明我们的项目是一个关于水资源管理的系统，它利用ArcEngine技术实现了“鹰眼”视图。鹰眼视图，又称为小地图或导航视图，是一种在主地图界面中嵌入的小型地图，用于提供全局视角，帮助用户快速定位和导航。 在...
ArcEngine的一个简单鹰眼
weixin_34220834的博客
08-12 164
首先，添加两个MapControl,主图命名为mapMain，鹰眼图命名为mapEye Imports ESRI.ArcGIS.Geometry Imports ESRI.ArcGIS.Display Public Class Form1 Private EyeRect As IEnvelope '鹰眼矩形框范围 Private EyeSym...
ArcGIS中鹰眼功能实现（绝对可以用的代码）
11-26
.mxml的文件，放在很多开发环境下都可以运行
ArcEngine（C#）鹰眼独立窗口显示
06-28
借鉴网上的方法优化了鹰眼窗口未使用情况下报错的问题（问题很简单）
ArcEngine开发鹰眼浏览
weixin_40466386的博客
10-17 380
ArcEngine开发鹰眼浏览 用c#做ARCengine鹰眼开发时代码没有提示错误，但是运行之后没有效果，这是咋回事呢？问下大神 代码和结果如下： using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using S...
C#,arcengine制作鹰眼全过程（带注释）
yanleigis的专栏
04-18 5572
C#制作鹰眼全过程（带注释） axMapControl1是主控件 要看清楚事件响应     1.鹰眼地图资源载入  private void axMapControl1_OnMapReplaced(object sender, IMapControlEvents2_OnMapReplacedEvent e)          
arcengine突击2——鹰眼实现
DL_GIS
11-28 696
分析： 主视图事件，当地图加载时，鸟瞰视图也随之加载地图；当主视图显示范围发生变化，鸟瞰视图框框（框框代表对主视图的鸟瞰）发生变化。 鸟瞰视图事件，当按住鼠标左键移动、鼠标单击时捕捉主视图范围，更新框框 添加liscen控件、两个map控件、toc控件、toolbar控件；在toc、toolbar属性页的buddy中设置绑定map1；在toolbar属性页中添加文件打开open。 点击...
基于ArcEngine与C#的鹰眼地图实现
stay hungry stay foolish
11-16 549
鹰眼图是对全局地图的一种概略表达，具有与全局地图的空间参考和空间范围。为了更好起到空间提示和导航作用，有些还具备全局地图中重要地理要素，如主要河流、道路等的概略表达。通过两个axMapControl控件，主控件axMapControl 1和鹰眼控件axMapControl 2。要实现鹰眼功能，关键技术有两点，一是如何让两个控件使用的数据保持一致，另一点是如何绘制鹰眼控件中的显示方框。 一...
ArcGIS Engine：视图菜单的创建和鹰眼图的实现
炒茄子的博客
10-05 2430
因为我们的代码一定意义上是从头开始写的，所以每一个控件都是互不关联的，例如你的ToolBar控件中的工具，正常人都知道这个工具应该是需要在MapControl控件中进行使用（或多或i少），例如TOC控件中展示的图层信息应该是在MapControl控件中显示的那些文件，再例如你使用ToolBar控件中的工具进行数据的加载那么加载好的数据是不是应该显示在MapControl中呢，所以这又是联系。方法加载一个新的MXD（Map Exchange Document，ArcMap的地图文档格式）时，当前的。
ArcGIS Engine-鹰眼图的实现
Lineng's blog
04-24 2992
实现鹰眼图的功能需要两个AxMapControl控件，我们就让axMapControl1作为主视图，axMapControl2作为鹰眼图，在窗体中的摆放位置可以自定义，我是用SplitContainer将Form分割开来： 实现鹰眼图前需要明白鹰眼图的功能： 鹰眼图是主视图的缩略图，鹰眼图是主视图的全局视图 主视图的当前视图对应鹰眼图中的红框范围 鼠标可以点击鹰眼图，主视图对应转换成以点击位置为中心的视图，也可以在鹰眼图上拖出显示范围 整个过程的消息传递机制： axMapControl1加载主图时，触
基于Python flask 的豆瓣电影top250数据评分可视化
最新发布
08-03
基于Python flask 的豆瓣电影top250数据评分可视化
C# 实现 ArcEngine 符号选择对话框
"ArcEngine开发代码集合，包含了ArcEngine开发中常用的功能代码，特别是与符号选择对话框相关的C#实现。" 在ArcEngine开发中，创建和管理地图的符号是至关重要的任务之一。在这个代码集合中，你可以找到如何通过C#...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值