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

TAChart: Remove warning about Dispatch method redefinition

Browse Source 
git-svn-id: trunk@28540 -
This commit is contained in:
ask 2010-11-28 15:38:15 +00:00
parent 9909540c02
commit 1697ac1990
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/tachart/tagraph.pas
View File

@ -111,7 +111,7 @@ type
protected
function Dispatch(
AChart: TChart; AEventId: TChartToolEventId;
AShift: TShiftState; APoint: TPoint): Boolean; virtual; abstract;
AShift: TShiftState; APoint: TPoint): Boolean; virtual; abstract; overload;
end;
{ TChartSeriesList }

2
components/tachart/tatools.pas
View File

@ -56,7 +56,7 @@ type
procedure Activate; override;
procedure Deactivate; override;
procedure Dispatch(
AChart: TChart; AEventId: TChartToolEventId; APoint: TPoint);
AChart: TChart; AEventId: TChartToolEventId; APoint: TPoint); overload;
function GetIndex: Integer; override;
function IsActive: Boolean;
procedure MouseDown(APoint: TPoint); virtual;