From 3d868141acbffbe7be7b2f5ca76d5f9eb45a87d4 Mon Sep 17 00:00:00 2001 From: sgwp <63001967@qq.com> Date: Wed, 12 Feb 2025 10:18:51 +0800 Subject: [PATCH] =?UTF-8?q?=E4=BF=AE=E6=94=B9=20=E7=BB=A7=E6=89=BF?= =?UTF-8?q?=E5=AD=97=E4=BD=93=E5=A4=A7=E5=B0=8F=E5=88=9D=E5=A7=8B=E5=8C=96?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- .../Dp10RepoV1/public10/design/U_FormLayOutDesign.pas | 10 +++------- 1 file changed, 3 insertions(+), 7 deletions(-) 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;