瀏覽代碼

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

git-svn-id: trunk@43889 -
michael 6 年之前
父節點
當前提交
873305e9ee
共有 1 個文件被更改,包括 2 次插入0 次删除
  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;