欢迎来到天天文库
浏览记录
ID:23862596
大小:1021.50 KB
页数:15页
时间:2018-11-11
《《gis项目开发》word版》由会员上传分享,免费在线阅读,更多相关内容在应用文档-天天文库。
1、实验(一)一.实验项目名称:地图图层化1.实验内容:利用矢量化软件对地图矢量化2.实验要求:对图层矢量化掌握3.应配备的主要设备名称和台件数计算机(每人一台)Mapinfo及MapX控件二.实验步骤1.启动mapinfo,在MapInfo中按照"文件->打开表"打开对话框,“文件类型->栅格图像”,打开MapInfo栅格图像文件清单;2.要打开的“西安市交通图”栅格图像文件选择"打开",在"图像配准"对话框中选择"配准";3.在"投影"->"选择投影"中设定该图像的地图投影;4.在配准对话框的预览图像上,将鼠标并移到
2、一个已知地图坐标的点,单击鼠标按钮,输入对应图像上地图坐标,"确定";5.重复步骤4,输入最少四个控制点(x坐标输入经度,y坐标上输入纬度)完成配准;6.把配准信息保存到文件“*.tab”中。7.创建新图文件在工具栏中单击按钮,打开新建表对话框,打击创建,弹出新表结构对话框将“宾馆、酒店”,“公交路线”,“居民地”,“旅游景点”,“企事业单位”,“商场市场”,“乡政府及街道办“,“学校”,“医疗卫生”,“遗址遗迹”,“站点”,政府部门“,”主要车站“,“主要道路”图层可能建立的字段,在新表结构对话框中建立起来,选择所
3、需要的投影,保存为mapinfo默认格式。如“主要道路”3.单击【map】菜单,选择【laycontrol】项,依次将各图层处于编辑状态,然后再打开的底图上用绘图工具进行矢量编辑如图,矢量化好的主要道路4.最后将各图层矢量化的结果分别保存实验(二)一.实验项目名称:在地图中加数据1.实验内容:在地图中加属性数据2.实验要求:在Mapinfo中对地图加上数据3.应配备的主要设备名称和台件数计算机(每人一台)Mapinfo及MapX控件二.实验步骤1.打开矢量化好的要素图层,并且使其处于编辑状态。2.单击【main】工具
4、栏上的选择按钮工具,将鼠标移入地图窗口,鼠标会变为十字状3.在窗口中单击选中要加入属性的对象,会弹出一个“infotool”对话框,里面显示了该对象的属性字段,直接在相应属性字段中赋值。4.然后用鼠标选中另一个对象,重复步骤3,完成属性数据的输入。如“主要道路”层,,再点击要赋属性的一条道路,出现如图对话框进行赋值实验(三)一.实验项目名称:特征与选择集合1.实验内容:对特征进行选择2.实验要求:VB编写选择代码3.应配备的主要设备名称和台件数计算机(每人一台)Mapinfo及MapX控件二.实验步骤1.点击“文件-
5、新建工程”,选择的“标准EXE”,会自动生成一窗体2.在左侧控件栏中右键点击“部件…..”选择“MapInfoMapXV4”、MicrosoftCommonDialogControl6.0”、“MicrosoftWindowsCommonControls6.0”添加3.将“CommonDialog”、“map”和“ImageList”控件拖入窗体中4.选择“工具-菜单编辑器”在其中编辑菜单项并设置名称5.用“Toolbar”控件建立快捷工具条,然后点击右键->属性,打开属性页对话框,点击“通用”标签,选择“Image
6、List1”,点击“按钮”标签,添加“打开”“放大”“缩小”等快捷键,点击“图片”给相应的快捷键添加图标并建立合适的索引。用“ComboBox”控件添加下拉菜单。6.在“Combo1”属性中的“List”中将所有图层的名称添加进去,得到如下图7.图像索引,标题和关键字,选择“查看代码”输入:PrivateSubzoomin_Click()Map1.CurrentTool=miZoomInToolEndSubPrivateSubzoomout_Click()Map1.CurrentTool=miZoomOutToolE
7、ndSubPrivateSuballmap_Click()Map1.Bounds=Map1.Layers.BoundsEndSubPrivateSubcircleseek_Click()Map1.CurrentTool=miRadiusSelectToolEndSubPrivateSubpan_Click()Map1.CurrentTool=miPanToolEndSubPrivateSubployseek_Click()Map1.CurrentTool=miPolygonSelectToolEndSubPrivat
8、eSubpointseek_Click()Map1.CurrentTool=miSelectToolEndSubPrivateSubrectseek_Click()Map1.CurrentTool=miRectSelectToolEndSub则点查询、圆查询、矩查询、区查询编辑完成8.利用“Map”和“ListBox”添加Map1和List1再
此文档下载收益归作者所有