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

TAChart: Add Chart and NearestGraphPoint properties to data tools

Browse Source 
git-svn-id: trunk@32023 -
This commit is contained in:
ask 2011-08-21 01:10:04 +00:00
parent 0dc543f26e
commit 2411bc6d12
2 changed files with 3 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

@ -99,6 +99,8 @@ type
procedure Activate; virtual; procedure Activate; virtual;
procedure Deactivate; virtual; procedure Deactivate; virtual;
public
property Chart: TChart read FChart;
end; end;
TChartToolEventId = ( TChartToolEventId = (

1
components/tachart/tatools.pas
View File

@ -308,6 +308,7 @@ type
public public
constructor Create(AOwner: TComponent); override; constructor Create(AOwner: TComponent); override;
public public
property NearestGraphPoint: TDoublePoint read FNearestGraphPoint;
property PointIndex: Integer read FPointIndex; property PointIndex: Integer read FPointIndex;
property Series: TBasicChartSeries read FSeries; property Series: TBasicChartSeries read FSeries;
published published