diff --git a/source/main.lfm b/source/main.lfm
index 9843e90d..bf8dd880 100644
--- a/source/main.lfm
+++ b/source/main.lfm
@@ -905,7 +905,9 @@ object MainForm: TMainForm
           Top = 0
           Width = 23
           Action = actFavoriteObjectsOnly
+          AllowAllUp = True
           Anchors = [akTop, akRight]
+          GroupIndex = 1
           Images = ImageListMain
           ImageIndex = 113
           ShowCaption = False
@@ -20434,6 +20436,7 @@ object MainForm: TMainForm
         AutoCheck = True
       end
       object menuShowSizeColumn: TMenuItem
+        AutoCheck = True
         Caption = 'Display size of objects'
         OnClick = menuShowSizeColumnClick
       end
diff --git a/source/main.pas b/source/main.pas
index 42cb1c51..613a7aff 100644
--- a/source/main.pas
+++ b/source/main.pas
@@ -12641,8 +12641,7 @@ end;
 procedure TMainForm.actFavoriteObjectsOnlyExecute(Sender: TObject);
 begin
   // Click on "tree favorites" main button
-  // actFavoriteObjectsOnly.AutoCheck does not work?
-  //actFavoriteObjectsOnly.Checked := not actFavoriteObjectsOnly.Checked;
+  // Note: a TSpeedButton connected to an auto-checked TAction needs AllowAllUp + GroupIndex>0
   editDatabaseTableFilterChange(Sender);
   if actFavoriteObjectsOnly.Checked then
     actFavoriteObjectsOnly.ImageIndex := 112