From d1da579c7709618a13fceabb3950aadec2264308 Mon Sep 17 00:00:00 2001
From: wp <wp.no-reply@lazarus-ide-org>
Date: Thu, 4 Apr 2019 18:01:10 +0000
Subject: [PATCH] TAChart: Add forgotten properties to
 TChartSeriesLegend.Assign.

git-svn-id: trunk@60835 -
---
 components/tachart/talegend.pas | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/components/tachart/talegend.pas b/components/tachart/talegend.pas
index 7433d869eb..94c75cb230 100644
--- a/components/tachart/talegend.pas
+++ b/components/tachart/talegend.pas
@@ -965,10 +965,14 @@ procedure TChartSeriesLegend.Assign(Source: TPersistent);
 begin
   if Source is TChartSeriesLegend then
     with TChartSeriesLegend(Source) do begin
+      Self.FFormat := FFormat;
+      Self.FGroupIndex := FGroupIndex;
       Self.FMultiplicity := FMultiplicity;
       Self.FOnDraw := FOnDraw;
+      Self.FOrder := FOrder;
       Self.FTextFormat := FTextFormat;
       Self.FUserItemsCount := FUserItemsCount;
+      Self.FVisible := FVisible;
     end;
 
   inherited Assign(Source);