Clears all input/output features previously stored in the currently active analysis layer.
[C#]
///<summary>Clears all input/output features previously stored in the currently active analysis layer.</summary> /// ///<param name="naWindow">An INAWindow interface.</param> ///<param name="activeView">An IActiveView interface.</param> /// ///<remarks></remarks> public static void ClearActiveAnalysisLayer(ESRI.ArcGIS.NetworkAnalystUI.INAWindow naWindow, ESRI.ArcGIS.Carto.IActiveView activeView) { ESRI.ArcGIS.NetworkAnalyst.INALayer naLayer = naWindow.ActiveAnalysis; ESRI.ArcGIS.NetworkAnalyst.INAContext naContext = naLayer.Context; ESRI.ArcGIS.NetworkAnalyst.INamedSet namedSet = naContext.NAClasses; naWindow.DelayEvents(null, true); naWindow.DelayWindowUpdates(true); ESRI.ArcGIS.NetworkAnalyst.INAClass naClass; for (System.Int32 i = 0; i < namedSet.Count; i++) { System.Object theObject = namedSet.get_Item(i); naClass = theObject as ESRI.ArcGIS.NetworkAnalyst.INAClass; naClass.DeleteAllRows(); } naWindow.DelayWindowUpdates(false); naWindow.DelayEvents(null, false); activeView.Refresh(); }
[Visual Basic .NET]
'''<summary>Clears all input/output features previously stored in the currently active analysis layer.</summary> ''' '''<param name="naWindow">An INAWindow interface.</param> '''<param name="activeView">An IActiveView interface.</param> ''' '''<remarks></remarks> Public Shared Sub ClearActiveAnalysisLayer(ByVal naWindow As ESRI.ArcGIS.NetworkAnalystUI.INAWindow, ByVal activeView As ESRI.ArcGIS.Carto.IActiveView) Dim naLayer As ESRI.ArcGIS.NetworkAnalyst.INALayer = naWindow.ActiveAnalysis Dim naContext As ESRI.ArcGIS.NetworkAnalyst.INAContext = naLayer.Context Dim namedSet As ESRI.ArcGIS.NetworkAnalyst.INamedSet = naContext.NAClasses naWindow.DelayEvents(Nothing, True) naWindow.DelayWindowUpdates(True) Dim naClass As ESRI.ArcGIS.NetworkAnalyst.INAClass Dim i As System.Int32 = 0 For i = 0 To namedSet.Count - 1 Dim theObject As System.Object = namedSet.Item(i) naClass = CType(theObject, ESRI.ArcGIS.NetworkAnalyst.INAClass) ' Explicit Cast naClass.DeleteAllRows() Next naWindow.DelayWindowUpdates(False) naWindow.DelayEvents(Nothing, False) activeView.Refresh() End Sub