阅读:5627回复:17
[原创]vb + engine 用raster生成等值线源码最近再弄等值线问题,有点眉目了,我是用点shp文件生成IDW(范围比实际大),然后用边界shp文件来裁剪raster,最后用raster生成等值线,保存为shp,同时也在图层里显示,下面把源码显上来,大家一起学习进步! Public Function CreateRasterFromPoint(pMap As IMap, sName As String, sFieldName As String, dCellSize As Double, strOutName As String) ' Create FeatureClassDescriptor using a value field ' Set cell size for output raster. The extent of the output raster is xmin = 20360000 ' Using FeatureClassDescriptor as an input to the IInterpolationOp and '判断strOutName是否存在,如果存在,删除先 Dim pGeo As IGeometry '用边界裁剪raster |
|
1楼#
发布于:2007-07-10 18:24
我也做过类似的功能,做此类功能需要注意的是及时释放com对象,防止不必要的错误产生。 |
|
|
2楼#
发布于:2007-07-09 18:47
请问UsingRasterClassifyColorRampRenderer子程序是根据颜色渲染,怎样根据值进行分类渲染?谢谢!
|
|
3楼#
发布于:2006-05-20 09:44
太好了,我也要用engine 生成等值线 |
|
4楼#
发布于:2006-04-19 21:35
退出时要set pObj=nothing,不然要占用内在 你的代码不错,有机会探讨一下,我的QQ:230998, |
|
|
5楼#
发布于:2006-04-19 21:33
创建了对象,在退出时就要set pObj=nothing,wq r
|
|
|
6楼#
发布于:2006-04-18 16:28
对阿,最后生成的就是等值线,保存为shapfile,等值面是Raster,文件 |
|
7楼#
发布于:2006-04-14 01:01
很好!! LZ,用的就是插值分析吧? 请问最后生成的是线状数据吗? ![]() |
|
8楼#
发布于:2006-04-11 05:39
请问用engine能实现arcmap中的空间分析功能吗?
|
|
9楼#
发布于:2006-03-22 21:12
请问你说的边界时什么意思,我原来生成的raster是矩形的,是被一个边界shapefile给裁成这样的 |
|