地理信息系统开发具体教程

地理信息系统开发具体教程 一、基本控件的添加

1.1.新建项目

文件----->新建---->项目---->Windows 窗体应用

1.2.修改标题

右击窗体属性---->在Text中修改标题名称

1.3.添加菜单栏

工具箱---->菜单和工具栏---->MenuStrip(将MenuStrip拖入到窗体内) 依次添加子标题如下：

1.4.添加ToolStripContainer

工具箱---->菜单和工具栏----> ToolStripContainer

将ToolStripContainer拖入到窗体内，右击属性，Spring属性设置为True,在添加一个

Statuslabel,在属性中的text修改名称

1.5.添加SplitContainer

工具箱---->菜单和工具栏---->SplitContainer

将SplitContainer拖入到窗体中，并将右击属性中Dock设置为“Fill”

1.6.添加控件

工具箱---->ArcGIS Windows Froms

将TOCC Control 和MapControl 拖入到窗口中分别设置在左右侧

中改为axMapControl1

添加控件License Control 工具箱---->ArcGIS Windows Froms----> License Control

把License Control拖入到窗体中

注意：要是程序能够正常运行，需要在Program.CS中添加一段代码，代码如下：ESRI.ArcGIS.RuntimeManager.Bind(ESRI.ArcGIS.ProductCode.EngineOrDesktop);

二、添加代码

2.1打开文件

在菜单下双击“打开地图文档”属性

（1）直接打开文件

书写格式如下：

this.axMapControl1.LoadMxFile(@"文件的具体地址\文件的名称.文件格式”);

例子如下：

this.axMapControl1.LoadMxFile(@E:\ArcGIS Engine 地理信息系统开发教程---基于C#.NET\chp03\地图操作\data\Mxd文件\Qingdao.mxd");

（2）设置可选择的文件打开方式

OpenFileDialog pOpenFiledialog = new OpenFileDialog();

pOpenFiledialog.InitialDirectory=@E:\ArcGIS Engine 地理信息系统开发教程---基于

C#.NET\chp03\地图操作\data\Mxd文件" ;

pOpenFiledialog.Filter = "文本文件（*.mxd)|*.mxd|所有文件（*.*)|*.*";

pOpenFiledialog.Title = "打开地图文档";

if (pOpenFiledialog.ShowDialog() == DialogResult.OK)

{

string mxdfilpath = pOpenFiledialog.FileName;

if (this.axMapControl1.CheckMxFile(mxdfilpath))

{

this.axMapControl1.LoadMxFile(mxdfilpath);

}

else

{

MessageBox.Show("打开地图文档无效!");

}

（3）使用ControlsOpenDocCommandClass加载

添加代码如下：

ICommand command = new ControlsOpenDocCommandClass();

command.OnCreate(this.axMapControl1.Object);

command.OnClick();

注意：如果直接运行会出现错误，因为没有添加引用，我们需要添加引用ESRI.ArcGIS.SystemUI; ESRI.ArcGIS.Controls;

然后在使用空间：using ESRI.ArcGIS.SystemUI;

using ESRI.ArcGIS.Controls;

地图浏览

添加控件menuStrip 和toolStrip 还有statusStrip

依次添加控件分栏容器控件

splitContainer1）、内容表控件（axTOCControl1）、地图视图控件（axMapControl1）、许可控件（axLicenseControl1）。

2.为工具栏控件添加8 个按钮（BUTTON），依次将其文本（text 属

性）改为：打开地图、加载数据、逐级放大、逐级缩小、拉框放大、

拉框缩小、漫游、全图、前一视图、后一视图，并设置相应图标依次将其NAME 属性改为

CmdOpen, CmdAdd,

CmdZoomIn, CmdZoonOut, ToolZoomIn, ToolZoomOut, ToolPan, CmdFullextent、CmdBack、CmdNext

点击button ->Displaystyle->ImageAndText 可以使修改的TEXT名称显示出来

3.双击button“打开地图”添加代码如下

ICommand command = new ControlsOpenDocCommandClass();

command.OnCreate(this.axMapControl1.Object);

command.OnClick();

注意：使用代码之前要引用命名空间

using ESRI.ArcGIS.SystemUI;

using ESRI.ArcGIS.Controls;

4.双击button“加载数据”添加代码如下：

5.双击button“逐级放大”“逐级缩小”分别添加代码如下：

注意：在添加代码前，需要添加引用空间代码using ESRI.ArcGIS.Geometry;

IEnvelope pEnvelope;

pEnvelope = axMapControl1.Extent;

pEnvelope.Expand(0.5, 0.5, true);

//这a里?设Θ?置?缩?小?为a一?半?，?可é以?根ù据Y需è要癮具?体?设Θ?置?

axMapControl1.Extent = pEnvelope;

axMapControl1.ActiveView.Refresh();

IEnvelope pEnvelope;

pEnvelope = axMapControl1.Extent;

pEnvelope.Expand(2, 2, true);

//这a里?设Θ?置?缩?小?为a一?半?，?可é以?根ù据Y需è要癮具?体?设Θ?置?

axMapControl1.Extent = pEnvelope;

axMapControl1.ActiveView.Refresh();

6.双击button“拉框放大”“拉框缩小”分别添加代码如下：

ControlsMapZoomInTool objTool = new ControlsMapZoomInToolClass();

objTool.OnCreate(axMapControl1.Object);

axMapControl1.CurrentTool = (ITool)objTool;

ControlsMapZoomOutTool objTool = new ControlsMapZoomOutToolClass();

objTool.OnCreate(axMapControl1.Object);

axMapControl1.CurrentTool = (ITool)objTool;

7.双击button“拉框放大”“拉框缩小”分别添加代码如下：

ControlsMapZoomInTool objTool = new ControlsMapZoomInToolClass();

objTool.OnCreate(axMapControl1.Object);

axMapControl1.CurrentTool = (ITool)objTool;

ControlsMapZoomOutTool objTool = new ControlsMapZoomOutToolClass();

objTool.OnCreate(axMapControl1.Object);

axMapControl1.CurrentTool = (ITool)objTool;

8.双击button“漫游”添加代码如下：

string pMouseOperate = null;

axMapControl1.CurrentTool = null;

pMouseOperate = "Pan";

axMapControl1.MousePointer = esriControlsMousePointer.esriPointerPan;9.双击9.button“全图”添加代码如下：

axMapControl1.Extent = axMapControl1.FullExtent;

视图同步

1.按照如下设置界面

2.依次添加控件ToolBarControl和ToccControl和MapControl ,并将MapControl 的name改为EagleControl SpitContainer

3.将TabControl拖入到框内，并修改名称为数据和布局，并将属性中alignment中设置为bottom。

4.点击“数据”框，将MapControl拖入到其中，同样方法选中“布局”框将“PageLayoutControl 拖入其中，并将MapControl改名为MainControl

5.定义几个变量

private bool bCanDrag; //鹰眼地图上的矩形框可移动的标志

private IPoint pMoveRectPoint; //记录在移动鹰眼地图上的矩形框时鼠标的位置private IEnvelope pEnv; //记录数据视图的Extent

然后在初始化中写入以下代码：

private void Form1_Load(object sender, EventArgs e)

{

this.axTOCControl1.SetBuddyControl(this.mainMapControl);

EagleMapControl.Extent = mainMapControl.FullExtent;

pEnv = EagleMapControl.Extent;

}

6)首先实现主视图与鹰眼视图的数据保持一致，在 mainMapControl 控件的 OnMapRelaced 事件中写入以下代码：

private void mainMapControl_OnMapReplaced(object sender,

ESRI.ArcGIS.Controls.IMapControlEvents2_OnMapReplacedEvent e)

{

if (https://www.360docs.net/doc/fc14658023.html,yerCount > 0)

{

EagleMapControl.Map = new MapClass();

}

for (int i = 0; i <= https://www.360docs.net/doc/fc14658023.html,yerCount - 1; i++)

{

EagleMapControl.AddLayer(mainMapControl.get_Layer(i));

}

EagleMapControl.Extent = mainMapControl.Extent;

EagleMapControl.Refresh();

}

7）添加矩形框

当数据视图的显示范围发生变化时，会触发触发数据视图

（ MapControl1）中 OnExtentUpdata 事件，在该事件中绘制鹰眼视图

中的方框。获取数据视图中的地图显示范围作为矩形框范围，添加到鹰眼视图中。代码如下

private void mainMapControl_OnExtentUpdated(object sender,

ESRI.ArcGIS.Controls.IMapControlEvents2_OnExtentUpdatedEvent e)

{

//添加矩形框之前，需要清除鹰眼视图（ MapControl2）中任何图形元素。IGraphicsContainer pGraphicsContainer = EagleMapControl.Map as

//安徽理工大学测绘学院GIS 开发实验课讲义

IGraphicsContainer;

IActiveView pActiveView = pGraphicsContainer as IActiveView; pGraphicsContainer.DeleteAllElements();

//得到当前视图范围

pEnv = (IEnvelope)e.newEnvelope;

IRectangleElement pRectangleEle = new RectangleElementClass();

IElement pElement = pRectangleEle as IElement;

pElement.Geometry = pEnv;

//设置鹰眼图中的红线框

IRgbColor pColor = new RgbColorClass();

pColor.Red = 255;

pColor.Green = 0;

pColor.Blue = 0;

pColor.Transparency = 255;

//产生一个线符号对象

ILineSymbol pOutline = new SimpleLineSymbolClass();

pOutline.Width = 3;

pOutline.Color = pColor;

//设置颜色属性

pColor = new RgbColorClass();

pColor.Transparency = 0;

//设置填充符号的属性

IFillSymbol pFillSymbol = new SimpleFillSymbolClass();

pFillSymbol.Color = pColor;

pFillSymbol.Outline = pOutline;

//向鹰眼中添加矩形框

IFillShapeElement pFillShapeEle = pElement as IFillShapeElement; pFillShapeEle.Symbol = pFillSymbol;

pGraphicsContainer.AddElement((IElement)pFillShapeEle,0);

pActiveView.PartialRefresh(esriViewDrawPhase.esriViewGraphics,null,null); }

8）矩形框的拖动与绘制

private void EagleMapControl_OnMouseDown(object sender,

ESRI.ArcGIS.Controls.IMapControlEvents2_OnMouseDownEvent e)

{

if (https://www.360docs.net/doc/fc14658023.html,yerCount > 0)

{

//按下鼠标左键移动矩形框

if (e.button == 1)

{

//安徽理工大学测绘学院GIS 开发实验课讲义

//如果指针落在鹰眼的矩形框中，标记可移动

if (e.mapX > pEnv.XMin && e.mapY > pEnv.YMin && e.mapX <

pEnv.XMax && e.mapY < pEnv.YMax)

bCanDrag = true;

}

pMoveRectPoint = new PointClass();

pMoveRectPoint.PutCoords(e.mapX, e.mapY); //记录点击的第

一个点的坐标

}

//按下鼠标右键绘制矩形框

else if (e.button == 2)

{

IEnvelope pEnvelope = EagleMapControl.TrackRectangle();

IPoint pTempPoint = new PointClass();

pTempPoint.PutCoords(pEnvelope.XMin + pEnvelope.Width / 2, pEnvelope.YMin + pEnvelope.Height / 2);

mainMapControl.Extent = pEnvelope;

//矩形框的高宽和数据试图的高宽不一定成正比，这里做一个中心

调整

mainMapControl.CenterAt(pTempPoint);

}

}

}

//移动矩形框

private void EagleMapControl_OnMouseMove(object sender,

ESRI.ArcGIS.Controls.IMapControlEvents2_OnMouseMoveEvent e)

{

if (e.mapX > pEnv.XMin && e.mapY > pEnv.YMin && e.mapX < pEnv.XMax && e.mapY < pEnv.YMax)

{

//如果鼠标移动到矩形框中，鼠标换成小手，表示可以拖动EagleMapControl.MousePointer =

esriControlsMousePointer.esriPointerHand;

if (e.button == 2) //如果在内部按下鼠标右键，将鼠标样式设置为

默认样式

{

EagleMapControl.MousePointer =

esriControlsMousePointer.esriPointerDefault;

}

}

else

//安徽理工大学测绘学院GIS 开发实验课讲义

{

//在其他位置将鼠标设为默认的样式

EagleMapControl.MousePointer =

esriControlsMousePointer.esriPointerDefault;

if (bCanDrag)

{

double Dx, Dy; //记录鼠标移动的距离

Dx = e.mapX - pMoveRectPoint.X;

Dy = e.mapY - pMoveRectPoint.Y;

pEnv.Offset(Dx, Dy); //根据偏移量更改 pEnv 位置pMoveRectPoint.PutCoords(e.mapX, e.mapY);

//在绘制前，清除鹰眼中之前绘制的矩形框

IGraphicsContainer pGraphicsContainer = EagleMapControl.Map as IGraphicsContainer;

IActiveView pActiveView = pGraphicsContainer as IActiveView; pGraphicsContainer.DeleteAllElements();

//得到当前视图范围

IRectangleElement pRectangleElement = new RectangleElementClass();

IElement pElement = pRectangleElement as IElement;

pElement.Geometry = pEnv;

//设置矩形框（实质为中间透明度面）

IRgbColor pColor = new RgbColorClass();

pColor.Red = 255;

pColor.Green = 0;

pColor.Blue = 0;

pColor.Transparency = 255;

ILineSymbol pOutLine = new SimpleLineSymbolClass(); pOutLine.Width = 2;

pOutLine.Color = pColor;

IFillSymbol pFillSymbol = new SimpleFillSymbolClass();

pColor = new RgbColorClass();

pColor.Transparency = 0;

pFillSymbol.Color = pColor;

pFillSymbol.Outline = pOutLine;

//向鹰眼中添加矩形框

IFillShapeElement pFillShapeElement = pElement as IFillShapeElement;

pFillShapeElement.Symbol = pFillSymbol;

pGraphicsContainer.AddElement((IElement)pFillShapeElement, 0); //刷新

安徽理工大学测绘学院GIS 开发实验课讲义

pActiveView.PartialRefresh(esriViewDrawPhase.esriViewGraphics, null, null);

mainMapControl.Extent = pEnv;

}

}

private void EagleMapControl_OnMouseUp(object sender,

IMapControlEvents2_OnMouseUpEvent e)

{

if (e.button == 1 && pMoveRectPoint != null)

{

if (e.mapX == pMoveRectPoint.X && e.mapY == pMoveRectPoint.Y)

{

mainMapControl.CenterAt(pMoveRectPoint);

}

bCanDrag = false;

}

}

9）请同学们根据课上的讲解试图理解上面的代码。以上代码绘制矩形框的代码出现了两次，可以定义一个函数以减少代码冗余。鹰眼功能实现代码大致就是这些，同学们自己完成，以加深理解

10）数据视图与布局视图的联动，大致代码如下：

private void mainMapControl_OnAfterScreenDraw(object sender,

ESRI.ArcGIS.Controls.IMapControlEvents2_OnAfterScreenDrawEvent e)

{

IActiveView pActiveView =

(IActiveView)axPageLayoutControl1.ActiveView.FocusMap; IDisplayTransformation displayTransformation =

pActiveView.ScreenDisplay.DisplayTransformation;

displayTransformation.VisibleBounds = mainMapControl.Extent; axPageLayoutControl1.ActiveView.Refresh();

//CopyToPageLayout();

IObjectCopy pObjectCopy = new ObjectCopyClass();

object copyFromMap = mainMapControl.Map;

object copiedMap = pObjectCopy.Copy(copyFromMap);//复制地图到

copiedMap中

object copyToMap = axPageLayoutControl1.ActiveView.FocusMap; pObjectCopy.Overwrite(copiedMap, ref copyToMap); //复制地图axPageLayoutControl1.ActiveView.Refresh();

}