修改 继承字体大小初始化

Delphi10/开发档案/Dp10RepoV1/public10/design/U_FormLayOutDesign.pas

@@ -102,13 +102,9 @@ begin
     open;
     DServerDate := fieldByName('dt').AsDatetime;
   end;
-//  gFontSize:= getSystemFontSize(AdoTmp,PWideChar('01'));
-//
-//  for i := 0 to StyleRepository.Count-1 do
-//  begin
-//    if gFontSize>=9 then
-//      TcxStyle( StyleRepository.Items[i] ).Font.Size:=gFontSize;
-//  end;
+
+  InitStyleData(StyleRepository,gFontSize);
+
   result := true;
 end;