diff --git a/src/ce_projconf.lfm b/src/ce_projconf.lfm
index 2796c91c..cf3150bb 100644
--- a/src/ce_projconf.lfm
+++ b/src/ce_projconf.lfm
@@ -147,7 +147,6 @@ inherited CEProjectConfigurationWidget: TCEProjectConfigurationWidget
           Filter = [tkInteger, tkChar, tkEnumeration, tkFloat, tkSet, tkMethod, tkSString, tkLString, tkAString, tkWString, tkVariant, tkArray, tkRecord, tkInterface, tkClass, tkWChar, tkBool, tkInt64, tkQWord, tkDynArray, tkInterfaceRaw, tkProcVar, tkUString, tkUChar, tkHelper]
           Indent = 16
           NameFont.Color = clWindowText
-          OnEditorFilter = inspectorEditorFilter
           OnModified = inspectorModified
           PreferredSplitterX = 145
           SplitterX = 145
diff --git a/src/ce_projconf.pas b/src/ce_projconf.pas
index b8432eb9..8430c49d 100644
--- a/src/ce_projconf.pas
+++ b/src/ce_projconf.pas
@@ -27,7 +27,6 @@ type
     procedure btnDelConfClick(Sender: TObject);
     procedure btnCloneCurrClick(Sender: TObject);
     procedure btnSyncEditClick(Sender: TObject);
-    procedure inspectorEditorFilter(Sender: TObject; aEditor: TPropertyEditor;var aShow: boolean);
     procedure inspectorModified(Sender: TObject);
     procedure selConfChange(Sender: TObject);
     procedure TreeChange(Sender: TObject; Node: TTreeNode);
@@ -153,12 +152,6 @@ begin
   inspector.TIObject := getGridTarget;
 end;
 
-procedure TCEProjectConfigurationWidget.inspectorEditorFilter(Sender: TObject;
-  aEditor: TPropertyEditor; var aShow: boolean);
-begin
-  if aEditor.ClassType = TCollectionPropertyEditor then aShow := false;
-end;
-
 procedure TCEProjectConfigurationWidget.setSyncroMode(aValue: boolean);
 var
   png: TPortableNetworkGraphic;
@@ -316,12 +309,15 @@ procedure TCEProjectConfigurationWidget.GridFilter(Sender: TObject; aEditor: TPr
   var aShow: boolean);
 begin
   if fProj = nil then exit;
+
   // filter TComponent things.
   if getGridTarget = fProj then
   begin
     if aEditor.GetName = 'Name' then
       aShow := false
     else if aEditor.GetName = 'Tag' then
+      aShow := false
+    else  if aEditor.ClassType = TCollectionPropertyEditor then
       aShow := false;
   end;
   // deprecated field