Browse Source

* Patch from Pascal Riekenberg to fix running a report twice. (Bug ID 36592)

git-svn-id: trunk@43954 -
michael 5 years ago
parent
commit
b938a9654e
1 changed files with 1 additions and 0 deletions
  1. 1 0
      packages/fcl-report/src/fpreport.pp

+ 1 - 0
packages/fcl-report/src/fpreport.pp

@@ -8959,6 +8959,7 @@ end;
 procedure TFPCustomReport.RunReport;
 begin
   DoBeginReport;
+  ClearPreparedReport;
   StartLayout;
   CollectReportData;
   Validate;