From 01c3b379c0fbec74d0f9e7a99401c9e315f2d61f Mon Sep 17 00:00:00 2001
From: wp_xxyyzz <wp_xxyyzz@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Mon, 26 Oct 2020 08:54:34 +0000
Subject: [PATCH] LazStats: Complete inherited methods Reset and
 UpdateBtnStates in ChiSqrUnit.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7806 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 .../forms/analysis/nonparametric/chisqrunit.pas  | 16 +++++++++++++++-
 1 file changed, 15 insertions(+), 1 deletion(-)

diff --git a/applications/lazstats/source/forms/analysis/nonparametric/chisqrunit.pas b/applications/lazstats/source/forms/analysis/nonparametric/chisqrunit.pas
index dae87f80b..5b8bc1352 100644
--- a/applications/lazstats/source/forms/analysis/nonparametric/chisqrunit.pas
+++ b/applications/lazstats/source/forms/analysis/nonparametric/chisqrunit.pas
@@ -759,6 +759,13 @@ var
 begin
   inherited;
 
+  if FFrequenciesReportFrame <> nil then
+    FFrequenciesReportFrame.Clear;
+  if FRowColPropsReportFrame <> nil then
+    FRowColPropsReportFrame.Clear;
+  if FCellChiSqrReportFrame <> nil then
+    FCellChiSqrReportFrame.Clear;
+
   InputGrp.ItemIndex := 0;
 
   VarList.Clear;
@@ -816,7 +823,14 @@ end;
 procedure TChiSqrFrm.UpdateBtnStates;
 begin
   inherited;
-	
+
+  if FFrequenciesReportFrame <> nil then
+    FFrequenciesReportFrame.UpdateBtnStates;
+  if FRowColPropsReportFrame <> nil then
+    FRowColPropsReportFrame.UpdateBtnStates;
+  if FCellChiSqrReportFrame <> nil then
+    FCellChiSqrReportFrame.UpdateBtnStates;
+
   RowIn.Enabled := (VarList.Items.Count > 0) and (RowEdit.Text = '');
   ColIn.Enabled := (VarList.Items.Count > 0) and (ColEdit.Text = '');
   DepIn.Enabled := (VarList.Items.Count > 0) and (DepEdit.Text = '') and (InputGrp.ItemIndex > 0);