Browse Source

* Reset parent font when needed. Patch by Pascal Riekenberg (bug ID 36531)

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

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

@@ -5137,6 +5137,7 @@ begin
   FUseParentFont := True;
   FFont := TFPReportFont.Create;
   FFont.OnChanged:=@HandleFontChange;
+  ReassignParentFont;
   FCullThreshold := 75;
 end;
 
@@ -9439,6 +9440,7 @@ begin
   FBandPosition := bpNormal;
   FFont:=TFPReportFont.Create;
   FFont.OnChanged:=@HandleFontChange;
+  ReassignParentFont;
 end;
 
 destructor TFPReportCustomBand.Destroy;