فهرست منبع

* Fix bug #33400, clear should also clear run-time objects

git-svn-id: trunk@38469 -
michael 7 سال پیش
والد
کامیت
ba97e919e6
1فایلهای تغییر یافته به همراه2 افزوده شده و 0 حذف شده
  1. 2 0
      packages/fcl-report/src/fpreport.pp

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

@@ -7817,6 +7817,8 @@ Var
   P : TFPReportCustomPage;
 
 begin
+  // Previous run objects
+  EmptyRTObjects;
   // Variables
   FRTCurPageIdx := -1;
   FDateCreated := Now;