From 62793f087963d83cb8ccd26f522b90a1962b211d Mon Sep 17 00:00:00 2001 From: Ansgar Becker Date: Tue, 16 Mar 2021 18:46:22 +0100 Subject: [PATCH] Issue #136: fix crash now that ActiveGrid may return nil --- source/main.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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);