paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-12-05 17:19:18 +01:00
Code Issues Packages Projects Releases Wiki Activity

TAChart: Improved initialization of scaling transformation. Issue #34896, patch by Marcin Wiazowski.

Browse Source 
git-svn-id: trunk@60334 -
This commit is contained in:
wp 2019-02-04 18:03:40 +00:00
parent ae434164b9
commit 2c784a8bf2
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
components/tachart/tagraph.pas
View File

@ -706,7 +706,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;
@ -1489,7 +1489,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);