阅读:1691回复:1
请大家帮忙看看我的代码
<P><U><FONT color=#810081>该程序要实现的功能是:</FONT></U></P>
<P><U><FONT color=#810081>子任务1、访问pp要素类(rain.mdb/pp)并将其添加到当前地图(Map)中</FONT></U></P> <P><U><FONT color=#810081>子任务2、对pp里面的属性字段"p19791719"(及IDW插值里面的“Z”值)进行</FONT></U></P> <P><U><FONT color=#810081>IDW插值</FONT></U></P> <P><U><FONT color=#810081>目前我已经实现了子任务1,代码如下:</FONT></U></P> <P><U><FONT color=#810081> Dim pWorkspaceFactory As IWorkspaceFactory<BR> 'Dim pWS As IWorkspace<BR> Dim pFeatureWorkspace As IFeatureWorkspace<BR> Dim pFeatureClass As IFeatureClass<BR> Set pWorkspaceFactory = New AccessWorkspaceFactory<BR> 'Set pWS = pWorkspaceFactory.OpenFromFile("D:\temp\rain.mdb", 0)<BR> Set pFeatureWorkspace = pWorkspaceFactory.OpenFromFile</FONT></U></P> <P><U><FONT color=#810081>("D:\temp\rain.mdb", 0)<BR> Set pFeatureClass = pFeatureWorkspace.OpenFeatureClass("pp")<BR> 'Set pFeatureWorkspace = pFeatureWorkspace.OpenFeatureClass("pp")<BR> Dim pApp As IApplication<BR> Dim pMxDoc As IMxDocument<BR> Dim pFL As IFeatureLayer<BR> Set pApp = Application<BR> Set pMxDoc = pApp.Document<BR> Set pFL = New FeatureLayer<BR> Set pFL.FeatureClass = pFeatureClass<BR> pFL.Name = pFeatureClass.AliasName<BR> pMxDoc.FocusMap.AddLayer pFL</FONT></U></P> <P><U><FONT color=#810081>对于子任务2,根据例子,找到如下代码(我未作任何编辑):<BR>' Create the RasterInterpolationOp object<BR>Dim pInterpolationOp As IInterpolationOp<BR>Set pInterpolationOp = New RasterInterpolationOp<BR>' Create the input point object<BR>Dim pInputDataset As IGeoDataset<BR>' Calls function to open the point dataset from disk<BR>Set pInputDataset = OpenFeatureDataset("D:\SpatialData", </FONT></U></P> <P><U><FONT color=#810081>"inputpoints")<BR>' Define the search radius<BR>Dim pRadius As IRasterRadius<BR>Set pRadius = New RasterRadius<BR>pRadius.SetVariable 12<BR>' Create the output dataset object<BR>Dim pOutputDataset As IGeoDataset<BR>' Calls the method<BR>Set pOutputDataset = pInterpolationOp.IDW(pInputDataset, 3, pRadius)</FONT></U></P> <P><U><FONT color=#810081>但是现在的问题是子任务1用的是pFeatureClass,而子任务2需要</FONT></U></P> <P><U><FONT color=#810081>OpenFeatureDataset,请问这两个怎么联系呀?<BR>能完成IDW插值的代码应该怎么写呀?谢谢了</FONT></U></P> |
|
1楼#
发布于:2009-06-12 10:31
<P>看看这个帖子</P>
<P><a href="http://www.gisempire.com/bbs/Dispbbs.asp?boardid=62;ID=68770" target="_blank" >http://www.gisempire.com/bbs/Dispbbs.asp?boardid=62;ID=68770</A></P> <P>在论坛搜索下,有很多相关帖子</P> |
|
|