paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-08 23:18:01 +02:00
Code Issues Packages Projects Releases Wiki Activity

TAChart: Force recalculation of the full extent for linked charts

Browse Source 
git-svn-id: trunk@39930 -
This commit is contained in:
ask 2013-01-22 09:25:52 +00:00
parent 154e3f3567
commit 93ddc1aec3
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
components/tachart/tachartextentlink.pas
View File

@ -160,6 +160,9 @@ begin
ch := TLinkedChart(c).Chart;
// Do not sync if the chart was never drawn yet.
if (ch = nil) or (ch.LogicalExtent = EmptyExtent) then continue;
// ZoomFull is lazy by default, so full extent may be not recalculated yet.
if not ch.IsZoomed and (ch <> AChart) then
ch.LogicalExtent := ch.GetFullExtent;
// An event loop will be broken since setting LogicalExtent to
// the same value does not initiale the extent broadcast.
case Mode of