* Always initialize memo expressions, even if no Data available

git-svn-id: trunk@38561 -

packages/fcl-report/src/fpreport.pp

@@ -11127,14 +11127,15 @@ begin
       if Assigned(oData) and (oData<>aPageData) and (not odata.IsOpened) then
         oData.Open;
       end;
-    if IsFirstPass then
-      begin
-      Report.InitializeExpressionVariables;
-      Report.InitializePageAggregateData(lPage, aPageData);
-      Report.CacheMemoExpressions(lPage);
-      end;
     aPageData.First;
     end;
+  if IsFirstPass then
+    begin
+    Report.InitializeExpressionVariables;
+    if Assigned(aPageData) then
+      Report.InitializePageAggregateData(lPage, aPageData);
+    Report.CacheMemoExpressions(lPage);
+    end;
   InitBandList(lPage,aPageData);
   if Not Assigned(aPageData) then
     StartNewPage