From a178f5a031d6cb0ff571a970ff5642e44a70842d Mon Sep 17 00:00:00 2001 From: wp Date: Sun, 3 Mar 2019 10:14:36 +0000 Subject: [PATCH] TAChart: Change fit parameter count in the setter of TFitSeries.FitEquation only when required. Issue #35178. git-svn-id: trunk@60566 - --- components/tachart/tafuncseries.pas | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/components/tachart/tafuncseries.pas b/components/tachart/tafuncseries.pas index be32365822..f56ad9be70 100644 --- a/components/tachart/tafuncseries.pas +++ b/components/tachart/tafuncseries.pas @@ -1630,7 +1630,7 @@ begin FPen.OnChange := @StyleChanged; FStep := DEF_FIT_STEP; FConfidenceLevel := 0.95; - ParamCount := DEF_FIT_PARAM_COUNT; // Parabolic fit as default. + SetParamCount(DEF_FIT_PARAM_COUNT); // Parabolic fit as default. InvalidateFitResults; end; @@ -2130,8 +2130,8 @@ procedure TFitSeries.SetFitEquation(AValue: TFitEquation); begin if FFitEquation = AValue then exit; FFitEquation := AValue; - SetLength( - FFitParams, IfThen(FFitEquation in [fePolynomial, feCustom], DEF_FIT_PARAM_COUNT, 2)); + if not (FFitEquation in [fePolynomial, feCustom]) then + SetLength(FFitParams, 2); InvalidateFitResults; UpdateParentChart; end;