阅读:2004回复:5
请问总统如何在mo中做网格?
<P>请问总统如何在mo中做网格?即在地图上显示。</P>
<P>附用VB编程绘制网格图像 </P> <P>在FORM1上新建一个PICTURE1(并装载一幅你喜爱的图像)和两个COMMAND命令按钮在PICTURE1下面(即COMMAND1和COMMAND2),其他属性不变,然后输入以下代码:</P> <P>Private Sub Form_Load() '初始化设置 Picture1.AutoSize = True Command1.Caption = "显示网格" Command2.Caption = "取消网格" Form1.Caption = "显示网格图像演示程序" End Sub Private Sub Form_Activate() '设置网格颜色 Picture1.ForeColor = vbWhite Picture1.Move 0, 0 End Sub Private Sub Command1_Click() '显示网格 Dim HLINESNUM As Integer Dim WLINESNUM As Integer Dim XX As Integer Dim I As Integer Dim J As Integer Dim YY As Integer HLINESNUM = 15 '设置网格为15*15显示 WLINESNUM = 15 Picture1.Refresh Picture1.AutoRedraw = False XX = Int(Picture1.ScaleWidth / WLINESNUM) YY = Int(Picture1.ScaleHeight / HLINESNUM) For I = 1 To HLINESNUM + 1 Picture1.Line (XX * I, 0)-(XX * I, Picture1.Height - 1) Picture1.Line (0, YY * I)-(Picture1.Width - 1, YY * I) Next End Sub</P> <P>Private Sub Command2_Click() '取消网格 Picture1.AutoRedraw = False Picture1.Refresh End Sub Private Sub Form_Unload(Cancel As Integer) Unload Me '结束程序 End End Sub </P> |
|
|
1楼#
发布于:2004-09-27 08:39
<P>大家可以讨论一下,我现在正在做。</P>
|
|
|
2楼#
发布于:2004-09-27 08:43
<P>Mo可以用AddImage加入背景网格的。</P>
|
|
|
3楼#
发布于:2004-09-27 10:38
<P>如果只是用来做背景网格,可以自动生成一个线或者面的网格来代替了,不过不知道具体用处在哪里》?</P>
|
|
|
4楼#
发布于:2004-09-27 11:18
<P><FONT style="BACKGROUND-COLOR: #cccc33" face=楷体_GB2312 size=5><b>生成shp 格式的网格,目标是将空间信息离散化。</b></FONT></P>
<P><FONT style="BACKGROUND-COLOR: #cccc33" face=楷体_GB2312 size=5><b>数据格网化。把无规则分布的空间数据内插为规则分布的空间数据集,如规则矩形格网、三角网等。数据格网化能够更好地反映连续分布的空间现象,并对他们的变化加以模拟。现代地球科学模型和气候模型,都要求与GIS数据模型和遥感数据高度兼容的空间数据集。格网化的数据,尤其是规则矩形格网,已成为目前地学模型的主要数据形式。因此,对已知数据进行空间内插,得到格网化数据是模型的第一步。</b></FONT> <P><FONT style="BACKGROUND-COLOR: #cccc33" face=楷体_GB2312 size=5><b></b></FONT></P> <P><FONT style="BACKGROUND-COLOR: #cccc33" face=楷体_GB2312 size=5><b></b></FONT></P> <P><FONT style="BACKGROUND-COLOR: #cccc33" face=楷体_GB2312 size=5><b></b></FONT> <P exactly? mso-line-height-rule: 2.0; mso-char-indent-count: 25pt; LINE-HEIGHT: 24pt;><FONT style="BACKGROUND-COLOR: #cccc33" face=楷体_GB2312 size=5><b>选择一个合用的内插方法是空间内插的关键 。空间内插几何方法是最简单的内插方法。它主要是基于“地理学第一定律”的基本假设,即邻近的区域比距离远的区域更相似。几何方法的优点是计算开销少,具有普适性,不需要根据数据的特点对方法加以调整。当样本数据的密度足够大时,几何方法一般能达到满意的精度。几何方法的最大问题是,无法对误差进行理论估计。</b></FONT> <P><FONT style="BACKGROUND-COLOR: #cccc33" face=楷体_GB2312 size=5><b></b></FONT></P> <P><FONT style="BACKGROUND-COLOR: #cccc33" face=楷体_GB2312 size=5><b></b></FONT></P> <P exactly? mso-line-height-rule: 2.0; mso-char-indent-count: 25pt; LINE-HEIGHT: 24pt;><FONT style="BACKGROUND-COLOR: #cccc33" face=楷体_GB2312 size=5><b>最常用的几何方法有泰森多边形法和反距离加权方法。</b></FONT> <P><FONT style="BACKGROUND-COLOR: #cccc33" face=楷体_GB2312 size=5><b></b></FONT></P> <P><FONT style="BACKGROUND-COLOR: #cccc33" face=楷体_GB2312 size=5><b></b></FONT></P> <P exactly? mso-line-height-rule: 2.0; mso-char-indent-count: 25pt; LINE-HEIGHT: 24pt;><FONT style="BACKGROUND-COLOR: #cccc33" face=楷体_GB2312 size=5><b>泰森多边形,泰森多边形用于生成“领地”或控制区域。实际上,尽管泰森多边形产生于气候学领域,它却特别适合于专题数据的内插,因为它生成专题与专题之间明显的边界,不会有不同级别之间的中间现象。</b></FONT> <P><FONT style="BACKGROUND-COLOR: #cccc33" face=楷体_GB2312 size=5><b></b></FONT></P> <P><FONT style="BACKGROUND-COLOR: #cccc33" face=楷体_GB2312 size=5><b></b></FONT></P> <P exactly? mso-line-height-rule: 2.0; mso-char-indent-count: LINE-HEIGHT: 24pt; 23pt; TEXT-INDENT: 0pt; 0cm><FONT style="BACKGROUND-COLOR: #cccc33" face=楷体_GB2312 size=5><b>距离权重倒数(IDW),也叫距离反比法。它居于一种假设即越靠近的事物它们的性质越相似。距离反比法通过预测点周围的所测值来估算预测点值。因此距离在此是一个重要的参数。</b></FONT> <P><FONT style="BACKGROUND-COLOR: #cccc33" face=楷体_GB2312 size=5><b></b></FONT></P> <P><FONT style="BACKGROUND-COLOR: #cccc33" face=楷体_GB2312 size=5><b></b></FONT></P> <P><FONT style="BACKGROUND-COLOR: #cccc33" face=楷体_GB2312 size=5><b></b></FONT></P> [此贴子已经被作者于2004-9-27 11:20:44编辑过]
|
|
|
5楼#
发布于:2004-09-27 11:23
<P 24pt; LINE-HEIGHT: 25pt; mso-char-indent-count: 2.0; mso-line-height-rule: exactly"><FONT size=5><FONT face=楷体_GB2312><FONT style="BACKGROUND-COLOR: #f7b3f7"><FONT color=#0909f7>现有的GIS软件中所提供的空间内插方法较少,如ARC/INFO的IDW、趋势面、Kriging和一些特殊用途的函数方法, MapInfo中的反距离加权(IDW)插值器和不规则三角网(TIN)插值器,新推出的MaoInfo Professional 7.0,虽然提供了创建泰森多边形(Voronoi)的功能,但还未提供基于Voronoi多边形的数据内插方法。</FONT></FONT></FONT></FONT><p></p></P>
|
|
|