diff --git a/source/main.pas b/source/main.pas
index 93f6f706..faf5dac7 100644
--- a/source/main.pas
+++ b/source/main.pas
@@ -6234,7 +6234,7 @@ begin
       end;
     end;
   end;
-  inDataTab := PageControlMain.ActivePage = tabData;
+  inDataTab := Grid = DataGrid;
   inDataOrQueryTab := inDataTab or QueryTabActive;
   inDataOrQueryTabNotEmpty := inDataOrQueryTab and Assigned(Grid) and (Grid.RootNodeCount > 0);
   inGrid := Assigned(Grid) and (ActiveControl = Grid);