From d6dce85b445f50c7b853788b3ce526cb9840f31e Mon Sep 17 00:00:00 2001
From: Juha <juha@lazarus-ide.org>
Date: Fri, 2 Dec 2022 11:03:50 +0200
Subject: [PATCH] FpReport example: Fix a memory leak. Issue #40023, patch by
 Andreas F.

---
 examples/fpreport/simple/mainlclreport.pas | 1 +
 1 file changed, 1 insertion(+)

diff --git a/examples/fpreport/simple/mainlclreport.pas b/examples/fpreport/simple/mainlclreport.pas
index 8d512d59c2..1f34bbf80e 100644
--- a/examples/fpreport/simple/mainlclreport.pas
+++ b/examples/fpreport/simple/mainlclreport.pas
@@ -124,6 +124,7 @@ begin
     FReport.RenderReport(P);
     ShowMessage('PDF created: '+P.FileName);
   finally
+    P.Free;
     ButtonSet(true);
   end;
 end;