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

TAChart: Capture mouse on tools activation

Browse Source 
git-svn-id: trunk@24332 -
This commit is contained in:
ask 2010-04-01 09:46:57 +00:00
parent 4536384988
commit 297282634f
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/tachart/tagraph.pas
View File

@ -1173,10 +1173,12 @@ end;
procedure TBasicChartTool.Activate;
begin
FChart.FActiveToolIndex := Index;
FChart.MouseCapture := true;
end;
procedure TBasicChartTool.Deactivate;
begin
FChart.MouseCapture := false;
FChart.FActiveToolIndex := -1;
end;