NIM001573 for No Product Found

Bug-ID-Nummer	NIM001573
Eingereicht	March 15, 2006
Zuletzt geändert	April 2, 2025
Gilt für	No Product Found
Gefunden in Version	9.1
Status	Will Not Be Addressed

Zusätzliche Informationen

No Public Explanation

Workaround

- Right clicking the layer > Selection > Zoom to Selected still works properly.- If I export the txt to DBF and make the event layer based on the DBF, everything works fine.- If I export the txt events to a shp, everything works fine.- Calling my own "Zoom to selected" script works:Private Sub UIButtonControl1_Click()Dim pMap As IMapDim pActiveView As IActiveViewDim pMxDoc As IMxDocumentDim pTopo As ITopologicalOperatorDim pFeat As IFeatureDim pEnumFeature As IEnumFeatureDim pEnv As IEnvelopeDim pPolygon As IPolygonSet pMxDoc = ThisDocumentSet pMap = pMxDoc.FocusMapSet pActiveView = pMap' Create a new polygonSet pPolygon = New Polygon' Get the SelectionSet pEnumFeature = pMap.FeatureSelectionpEnumFeature.ResetSet pFeat = pEnumFeature.Next' Loop through the selected featuresDo While (Not pFeat Is Nothing) ' Make a copy of its geometry and get a ' handle to it in the form of an ITopologicalOperator Set pTopo = pFeat.ShapeCopy ' Union the shape with what you already have Set pPolygon = pTopo.Union(pPolygon) ' Go to the next feature Set pFeat = pEnumFeature.NextLoop' Get the envelope of the unioned resultSet pEnv = pPolygon.Envelope' Put it into the extent of the ActiveViewpActiveView.Extent = pEnv' Refresh the displaypActiveView.RefreshEnd Sub