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

TAChart: change inherited methods visibility to match parent class.

Browse Source 
git-svn-id: trunk@18855 -
This commit is contained in:
ask 2009-03-01 10:51:37 +00:00
parent 1017482ade
commit b83050cf62
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
components/tachart/tagraph.pas
View File

@ -182,13 +182,14 @@ type
function GetSeriesColor: TColor; virtual; abstract; function GetSeriesColor: TColor; virtual; abstract;
procedure SetSeriesColor(const AValue: TColor); virtual; abstract; procedure SetSeriesColor(const AValue: TColor); virtual; abstract;
function GetParentComponent: TComponent; override;
function HasParent: Boolean; override;
procedure ReadState(Reader: TReader); override; procedure ReadState(Reader: TReader); override;
procedure SetParentComponent(AParent: TComponent); override; procedure SetParentComponent(AParent: TComponent); override;
public public
destructor Destroy; override; destructor Destroy; override;
function GetParentComponent: TComponent; override;
function HasParent: Boolean; override;
function Count: Integer; virtual; abstract; function Count: Integer; virtual; abstract;
procedure DrawIfActive(ACanvas: TCanvas); virtual; abstract; procedure DrawIfActive(ACanvas: TCanvas); virtual; abstract;