From a6c0d8a0a7e9def41e4c778d7ebcd56af8f96eae Mon Sep 17 00:00:00 2001 From: mattias Date: Sat, 9 Feb 2019 08:46:07 +0000 Subject: [PATCH] TAChart: Improved initialization of scaling transformation. Issue #34896, patch by Marcin Wiazowski. git-svn-id: branches/fixes_2_0@60380 - --- components/tachart/tagraph.pas | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/components/tachart/tagraph.pas b/components/tachart/tagraph.pas index 7caead8a89..75b9e29774 100644 --- a/components/tachart/tagraph.pas +++ b/components/tachart/tagraph.pas @@ -702,7 +702,7 @@ begin FDefaultGUIConnector.CreateDrawer(FConnectorData); FGUIConnectorListener := TListener.Create(@FGUIConnector, @StyleChanged); - FScale := DoublePoint(1, 1); + FScale := DoublePoint(1, -1); Width := DEFAULT_CHART_WIDTH; Height := DEFAULT_CHART_HEIGHT; @@ -1485,7 +1485,7 @@ begin // There is a cyclic dependency: extent -> visible marks -> margins. // We recalculate them iteratively hoping that the process converges. - CalculateTransformationCoeffs(ZeroRect, scChartMargins, scMinDataSpace); + CalculateTransformationCoeffs(scSeriesMargins, scChartMargins, scMinDataSpace); cr := FClipRect; for tries := 1 to 10 do begin axisMargin := AxisList.Measure(CurrentExtent, scDepth);