MapWinGIS:Utils ShapeToShapeZ
From MapWindow GIS
ShapeToShapeZ
Creates a new shapefile with z values added from an elevation grid.
See also Grid and Shapefile
VB.NET Usage
Function ShapeToShapeZ(Shapefile As MapWinGIS.Shapefile, Grid As MapWinGIS.Grid, Optional cBack As MapWinGIS.ICallback) As MapWinGIS.Shapefile
Parameters
|
Shapefile | The shapefile to be converted to a new shapefile with z values. |
| Grid | The elevation grid to get the z values from. |
| cBack | Optional. The ICallback object which will receive progress and error messages while z values are being added to the shapefile. |
| ReturnValue | The new shapefile containing z values obtained from the elevation grid. |
Sample Code
Private Sub ShapeToShapeZ()
Dim utils As New MapWinGIS.Utils()
Dim sf As New MapWinGIS.Shapefile(), sfZ As New MapWinGIS.Shapefile()
Dim grid As New MapWinGIS.Grid()
'Create polygon shapefile from the grid
sf = utils.GridToShapefile(grid)
'Create polygon Z shapefile by adding elevation data from grid to the shapefile
sfZ = utils.ShapeToShapeZ(sf, grid, Me)
End Sub
VB 6 Usage
Function ShapeToShapeZ(Shapefile As Shapefile, Grid As Grid, Optional cBack As ICallback) As Shapefile
Parameters
|
Shapefile | The shapefile to be converted to a new shapefile with z values. |
| Grid | The elevation grid to get the z values from. |
| cBack | Optional. The ICallback object which will receive progress and error messages while z values are being added to the shapefile. |
| ReturnValue | The new shapefile containing z values obtained from the elevation grid. |
Sample Code
Private Sub ShapeToShapeZ()
Dim utils As New MapWinGIS.utils
Dim sf As New MapWinGIS.Shapefile, sfZ As New MapWinGIS.Shapefile
Dim grid As New MapWinGIS.grid
'Create polygon shapefile from the grid
Set sf = utils.GridToShapefile(grid)
'Create polygon Z shapefile by adding elevation data from grid to the shapefile
Set sfZ = utils.ShapeToShapeZ(sf, grid, Me)
End Sub
