IMcMeasuresRemove Method |
![]() |
Namespace: MediaCy.IQL.Features
Sub Remove ( MeasureIdToRemove As Integer )
'Keep only measurements in the mcmcfHousekeeping category in the collection With ThisApplication.ActiveImage.RegionFeatures. Measures.AddAll 'add all possible measurements Dim NextMcMeasure As McMeasure For Each NextMcMeasure In .Measures If NextMcMeasure.Attributes(mcmaidCategories) And mcmcfHousekeeping = 0 Then .Measures.Remove ThisApplication.McObject(NextMcMeasure) End If 'not a housekeeping measurement, so remove it from collection Next 'NextMcMeasure .Measures.SelectAll 'enable all measurements still in the collection End With