What I want is to delete a feature by objectID, currently I have got the objectID of the related feature, but I have no idea how to delete the feature, can anybody give me some advice?
The following is what I have now.
Public Sub RemovePoint(ByVal lpCreatWS As IWorkspace, ByVal lpFeatureLayer As IFeatureLayer, ByVal lsLayerName As String, ByVal lpFeatCursor As IFeatureCursor)Dim lpCreatVer As IVersionDim lpVersionEdit As IVersionEditDim lpWorkSpaceEdit As IWorkspaceEditDim lpVerFC As IFeatureClasslpCreatVer = lpCreatWSlpCreatVer.RefreshVersion() lpVersionEdit = lpCreatWSlpWorkSpaceEdit = lpCreatWSTry lpFeature = lpFeatCursor.NextFeature lpWorkSpaceEdit.StartEditing(True) Do Until lpFeature Is Nothing lpVerFC = lpObjSDEUtils.GetFeatureClass(lpCreatWS, lsLayerName) lpVerFeat = lpVerFC.GetFeature(lpFeature.OID) Catch ex As ExceptionEnd Try
أكثر...
The following is what I have now.
Public Sub RemovePoint(ByVal lpCreatWS As IWorkspace, ByVal lpFeatureLayer As IFeatureLayer, ByVal lsLayerName As String, ByVal lpFeatCursor As IFeatureCursor)Dim lpCreatVer As IVersionDim lpVersionEdit As IVersionEditDim lpWorkSpaceEdit As IWorkspaceEditDim lpVerFC As IFeatureClasslpCreatVer = lpCreatWSlpCreatVer.RefreshVersion() lpVersionEdit = lpCreatWSlpWorkSpaceEdit = lpCreatWSTry lpFeature = lpFeatCursor.NextFeature lpWorkSpaceEdit.StartEditing(True) Do Until lpFeature Is Nothing lpVerFC = lpObjSDEUtils.GetFeatureClass(lpCreatWS, lsLayerName) lpVerFeat = lpVerFC.GetFeature(lpFeature.OID) Catch ex As ExceptionEnd Try
أكثر...