diff --git a/Delphi10/开发档案/Dp10RepoV1/public10/design/U_FormLayOutDesign.pas b/Delphi10/开发档案/Dp10RepoV1/public10/design/U_FormLayOutDesign.pas index c23c079..711debe 100644 --- a/Delphi10/开发档案/Dp10RepoV1/public10/design/U_FormLayOutDesign.pas +++ b/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;