From b310a1d97708a49d4ff24dd8d655aba936abcdb5 Mon Sep 17 00:00:00 2001 From: marco Date: Mon, 20 Jan 2020 09:06:22 +0000 Subject: [PATCH] --- Merging r43190 into '.': U packages/fcl-report/src/fpreport.pp --- Recording mergeinfo for merge of r43190 into '.': U . # revisions: 43190 git-svn-id: branches/fixes_3_2@44003 - --- packages/fcl-report/src/fpreport.pp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/packages/fcl-report/src/fpreport.pp b/packages/fcl-report/src/fpreport.pp index c1ecc5a2c5..119a6fc24c 100644 --- a/packages/fcl-report/src/fpreport.pp +++ b/packages/fcl-report/src/fpreport.pp @@ -2516,7 +2516,7 @@ function ReportSectionsToString(AValue: TFPReportSections): string; lIndex: integer; begin Result := ''; - for lIndex := Ord(Low(TFPReportSection)) to Ord(High(TFPReportSection)) do + for lIndex := Ord(Low(TFPReportSections)) to Ord(High(TFPReportSections)) do begin if TFPReportSection(lIndex) in AValue then begin