paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2026-01-04 14:51:31 +01:00
Code Issues Packages Projects Releases Wiki Activity

TAChart: Fix cursor not restoring when during PanDrag the left mouse button is pressed (http://www.lazarusforum.de/viewtopic.php?f=18&t=12413).

Browse Source 
git-svn-id: trunk@61384 -
This commit is contained in:
wp 2019-06-14 09:50:38 +00:00
parent 010ccf9efa
commit b90a2cb91b
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/tatools.pas
View File

@ -998,7 +998,7 @@ end;
procedure TChartTool.SetCursor;
begin
if ActiveCursor = crDefault then exit;
if (ActiveCursor = crDefault) or (ActiveCursor = FChart.Cursor) then exit;
FOldCursor := FChart.Cursor;
FChart.Cursor := ActiveCursor;
end;