From c8835c761ea21d6e81242537d4562e3fa9d8cbf1 Mon Sep 17 00:00:00 2001
From: wp <wp.no-reply@lazarus-ide-org>
Date: Sat, 29 Dec 2018 19:25:14 +0000
Subject: [PATCH] TAChart: Add missing overload directives in TBasicDrawer
 class (issue #34774, patch by Jonas Maebe).

git-svn-id: trunk@59935 -
---
 components/tachart/tadrawutils.pas | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/components/tachart/tadrawutils.pas b/components/tachart/tadrawutils.pas
index 5c336929d4..7d005b4c22 100644
--- a/components/tachart/tadrawutils.pas
+++ b/components/tachart/tadrawutils.pas
@@ -163,10 +163,10 @@ type
     function GetFontSize: Integer; virtual; abstract;
     function GetFontStyle: TChartFontStyles; virtual; abstract;
     function GetRightToLeft: Boolean;
-    procedure LineTo(AX, AY: Integer); virtual; abstract;
-    procedure LineTo(const AP: TPoint);
-    procedure MoveTo(AX, AY: Integer); virtual; abstract;
-    procedure MoveTo(const AP: TPoint);
+    procedure LineTo(AX, AY: Integer); virtual; abstract; overload;
+    procedure LineTo(const AP: TPoint); overload;
+    procedure MoveTo(AX, AY: Integer); virtual; abstract; overload;
+    procedure MoveTo(const AP: TPoint); overload;
     procedure Polygon(
       const APoints: array of TPoint; AStartIndex, ANumPts: Integer); virtual; abstract;
     procedure PutImage(AX, AY: Integer; AImage: TFPCustomImage); virtual;
@@ -179,8 +179,8 @@ type
     procedure SetRightToLeft(AValue: Boolean);
     procedure SetTransparency(ATransparency: TChartTransparency);
     procedure SetXor(AXor: Boolean);
-    function TextExtent(const AText: String; ATextFormat: TChartTextFormat = tfNormal): TPoint;
-    function TextExtent(AText: TStrings; ATextFormat: TChartTextFormat = tfNormal): TPoint;
+    function TextExtent(const AText: String; ATextFormat: TChartTextFormat = tfNormal): TPoint; overload;
+    function TextExtent(AText: TStrings; ATextFormat: TChartTextFormat = tfNormal): TPoint; overload;
     function TextOut: TChartTextOut;
   end;