Map3D中获取地图中心及Zoom到新的中心点

简介:


如题,不更改当前比例尺,把指定点Zoom到地图中心。

 

复制代码
        Editor ed = Autodesk.AutoCAD.ApplicationServices.Application.DocumentManager.MdiActiveDocument.Editor;

        [CommandMethod( " ZoomCenter ")]
         public  void ZoomCenter()
        {
            AcMapMap map = AcMapMap.GetCurrentMap();
            MgEnvelope mapExtent = map.GetMapExtent();

             double centerX = mapExtent.LowerLeftCoordinate.X + mapExtent.Width /  2;
             double centerY = mapExtent.LowerLeftCoordinate.Y + mapExtent.Height /  2;

            ed.WriteMessage( " center: "+centerX.ToString()+ " , "+centerY.ToString()+ " \n ");

            Point3d centerPt;
            PromptPointOptions ppo =  new PromptPointOptions( " Click on map to zoom center: ");
            PromptPointResult ppr = ed.GetPoint(ppo);
             if (ppr.Status == PromptStatus.OK)
            {
                centerPt = ppr.Value;

                MgEnvelope newExtent =  new MgEnvelope(centerPt.X - mapExtent.Width /  2,
                                                                    centerPt.Y - mapExtent.Height /  2,
                                                                    centerPt.X + mapExtent.Width /  2,
                                                                    centerPt.Y + mapExtent.Height /  2);

                map.ZoomToExtent(newExtent);
            }

        }
复制代码

 

作者: 峻祁连
邮箱:junqilian@163.com 
出处: http://junqilian.cnblogs.com 
转载请保留此信息。



本文转自峻祁连. Moving to Cloud/Mobile博客园博客,原文链接:http://www.cnblogs.com/junqilian/archive/2011/10/12/2208849.html ,如需转载请自行联系原作者
目录
打赏
0
0
0
0
23
分享
相关文章
97Echarts - 地理坐标/地图(Draw Polygon on Map)
97Echarts - 地理坐标/地图(Draw Polygon on Map)
78 0
95Echarts - 地理坐标/地图(Binning on Map)
95Echarts - 地理坐标/地图(Binning on Map)
58 0
|
8月前
|
vue-baidu-map 自定义地图主题
vue-baidu-map 自定义地图主题
225 0
漏刻有时数据可视化Echarts组件开发(21):基于echarts开发的自动旋转map3D下钻和柱图地图
漏刻有时数据可视化Echarts组件开发(21):基于echarts开发的自动旋转map3D下钻和柱图地图
292 1
微信小程序学习实录5(H5嵌入小程序、map组件、地图调起功能、腾讯百度高德导航页、返回web-view页)
微信小程序学习实录5(H5嵌入小程序、map组件、地图调起功能、腾讯百度高德导航页、返回web-view页)
680 0
uniapp组件map地图组件使用
uniapp组件map地图组件使用
418 0
|
10月前
|
Python的pyecharts安装,导入map、geo模块,画地图
Python的pyecharts安装,导入map、geo模块,画地图
207 1
pyecharts从入门到精通-地图专题Map-带时间轴与网格的复杂绘图
pyecharts从入门到精通-地图专题Map-带时间轴与网格的复杂绘图
AI助理

你好,我是AI助理

可以解答问题、推荐解决方案等