MapWinGIS:Utils ShapeMerge
From MapWindow GIS
ShapeMerge
Merges two shapes in a shapefile to create a new shape.
See also Shapefile and Shape
VB.NET Usage
Function ShapeMerge(Shapes As MapWinGIS.Shapefile, IndexOne As Integer, IndexTwo As Integer, Optional cBack As MapWinGIS.ICallback) As MapWinGIS.Shape
Parameters
|
Shapes | The shapefile containing the two shapes to be merged to create the new shape. |
| IndexOne | The index of the first shape to be merged. |
| IndexTwo | The index of the second shape to be merged. |
| cBack | Optional. The ICallback object which will receive progress and error messages while the shapes are being merged. |
| Arg2 | description. |
Sample Code
Private Sub UtilShapeMerge()
Dim utils As New MapWinGIS.Utils()
Dim sf As New MapWinGIS.Shapefile()
Dim newshape As New MapWinGIS.Shape()
'Create a new shape from shape 0 and shape 1 in the shapefile
newshape = utils.ShapeMerge(sf, 0, 1, Me)
End Sub
VB 6 Usage
Function ShapeMerge(Shapes As Shapefile, IndexOne As Long, IndexTwo As Long, Optional cBack As ICallback) As Shape
Parameters
|
Shapes | The shapefile containing the two shapes to be merged to create the new shape. |
| IndexOne | The index of the first shape to be merged. |
| IndexTwo | The index of the second shape to be merged. |
| cBack | Optional. The ICallback object which will receive progress and error messages while the shapes are being merged. |
| Arg2 | description. |
Sample Code
Private Sub UtilShapeMerge()
Dim utils As New MapWinGIS.utils
Dim sf As New MapWinGIS.Shapefile
Dim newshape As New MapWinGIS.shape
'Create a new shape from shape 0 and shape 1 in the shapefile
Set newshape = utils.ShapeMerge(sf, 0, 1, Me)
End Sub
















