paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-14 11:19:24 +02:00
Code Issues Packages Projects Releases Wiki Activity

TAChart: Fix usage of incorrect drawing backend in OnAfterCustomDrawBackwall (https://www.lazarusforum.de/viewtopic.php?f=18&t=13347).

Browse Source 
git-svn-id: trunk@64379 -
This commit is contained in:
wp 2021-01-12 14:44:55 +00:00
parent ad7d239447
commit 68f758f8e2
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/tachart/tagraph.pas
View File

@ -1049,7 +1049,7 @@ begin
end; end;
if Assigned(OnAfterCustomDrawBackWall) then if Assigned(OnAfterCustomDrawBackWall) then
OnAfterCustomDrawBackwall(Self, Drawer, FClipRect); OnAfterCustomDrawBackwall(Self, ADrawer, FClipRect);
if Supports(ADrawer, IChartTCanvasDrawer, ic) and Assigned(OnAfterDrawBackWall) then if Supports(ADrawer, IChartTCanvasDrawer, ic) and Assigned(OnAfterDrawBackWall) then
OnAfterDrawBackWall(Self, ic.Canvas, FClipRect); OnAfterDrawBackWall(Self, ic.Canvas, FClipRect);