Issue #136: fix crash now that ActiveGrid may return nil

This commit is contained in:
Ansgar Becker
2021-03-16 18:46:22 +01:00
parent c75dfc2274
commit 62793f0879

View File

@ -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);