From 722cddb5f9cf1005768c9e4da3190566bc21e9c8 Mon Sep 17 00:00:00 2001
From: wp_xyz <wp_xxyyzzz@gmx.net>
Date: Thu, 31 Oct 2024 00:00:33 +0100
Subject: [PATCH] TAChart: Fix duplicate "virtual" directive of
 TBasicChartSeries.ClipRectChanged
 (https://forum.lazarus.freepascal.org/index.php/topic,69114.msg536109.html).

(cherry picked from commit b07267959f8bbd28e0f04a85909c4c3770902141)
---
 components/tachart/tagraph.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/components/tachart/tagraph.pas b/components/tachart/tagraph.pas
index d2ef990aba..38ec6c39d0 100644
--- a/components/tachart/tagraph.pas
+++ b/components/tachart/tagraph.pas
@@ -75,7 +75,7 @@ type
     destructor Destroy; override;
 
   public
-    procedure ClipRectChanged; virtual; virtual;
+    procedure ClipRectChanged; virtual;
     procedure Draw(ADrawer: IChartDrawer); virtual; abstract;
     function GetAxisBounds(AAxis: TChartAxis; out AMin, AMax: Double): boolean; virtual; abstract;
     function GetGraphBounds: TDoubleRect; virtual; abstract;