TAdvEdit. TAdvDateTimePicker, and TDAdvGrid font scaling issues

Wild_Nathan · May 30, 2023, 11:07pm

I sent this in to the support email yesterday, but it occurs to me that others may be having this issue as well so I thought I would post it here...

For some reason whenever I build my application on RadStudio 11.2 (on my laptop with a higher dpi screen) the exe it generates has ridiculously small fonts in my DBGrid. All the fonts are set to 9 point, and if I build the exact same application on my desktop (11.2 with a traditional display) it looks perfect.

I have similar issues (seemingly at random!?) with TAdvEdit's .LabelCaption fonts, as well as the captions on TAdvDateTimePicker controls...

Here is a screenshot of the application: Dropbox - Clipboard01.jpg - Simplify your life

Font is defined as: Segoe UI,9,[],DEFAULT_CHARSET,clWindowText

FixedFont is defined as: Segoe UI,12,[B],DEFAULT_CHARSET,clWindowText

Font for the parent control (my form) is: Segoe UI,9,[],DEFAULT_CHARSET,clWindowText

My grid is defined as:

object dbgJournal: TDBAdvGrid

Left = 66

Top = 190

Width = 1286

Height = 766

Margins.Left = 6

Margins.Top = 6

Margins.Right = 6

Margins.Bottom = 6

Anchors = [akLeft, akTop, akRight, akBottom]

ColCount = 6

DefaultColWidth = 128

DefaultRowHeight = 44

DrawingStyle = gdsGradient

FixedColor = clWhite

RowCount = 2

FixedRows = 1

Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing, goFixedRowDefAlign]

TabOrder = 1

StyleElements = [seFont, seBorder]

OnSearchFooterClose = dbgJournalSearchFooterClose

ActiveCellFont.Charset = DEFAULT_CHARSET

ActiveCellFont.Color = 4474440

ActiveCellFont.Height = -32

ActiveCellFont.Name = "Segoe UI"

ActiveCellFont.Style = [fsBold]

ActiveCellColor = 11565130

ActiveCellColorTo = 11565130

AutoSize = True

Bands.Active = True

BorderColor = 11250603

ColumnSize.Stretch = True

ColumnSize.StretchColumn = 1

ControlLook.FixedGradientFrom = clWhite

ControlLook.FixedGradientTo = clWhite

ControlLook.FixedGradientHoverFrom = clGray

ControlLook.FixedGradientHoverTo = clWhite

ControlLook.FixedGradientHoverMirrorFrom = clWhite

ControlLook.FixedGradientHoverMirrorTo = clWhite

ControlLook.FixedGradientHoverBorder = 11645361

ControlLook.FixedGradientDownFrom = clWhite

ControlLook.FixedGradientDownTo = clWhite

ControlLook.FixedGradientDownMirrorFrom = clWhite

ControlLook.FixedGradientDownMirrorTo = clWhite

ControlLook.FixedGradientDownBorder = 11250603

ControlLook.DropDownHeader.Font.Charset = DEFAULT_CHARSET

ControlLook.DropDownHeader.Font.Color = clWindowText

ControlLook.DropDownHeader.Font.Height = -11

ControlLook.DropDownHeader.Font.Name = "Segoe UI"

ControlLook.DropDownHeader.Font.Style = []

ControlLook.DropDownHeader.Visible = True

ControlLook.DropDownHeader.Buttons = <>

ControlLook.DropDownFooter.Font.Charset = DEFAULT_CHARSET

ControlLook.DropDownFooter.Font.Color = clWindowText

ControlLook.DropDownFooter.Font.Height = -11

ControlLook.DropDownFooter.Font.Name = "Segoe UI"

ControlLook.DropDownFooter.Font.Style = []

ControlLook.DropDownFooter.Visible = True

ControlLook.DropDownFooter.Buttons = <>

Filter = <>

FilterDropDown.Font.Charset = DEFAULT_CHARSET

FilterDropDown.Font.Color = clWindowText

FilterDropDown.Font.Height = -12

FilterDropDown.Font.Name = "Segoe UI"

FilterDropDown.Font.Style = []

FilterDropDown.TextChecked = "Checked"

FilterDropDown.TextUnChecked = "Unchecked"

FilterDropDownClear = "(All)"

FilterEdit.TypeNames.Strings = (

"Starts with"

"Ends with"

"Contains"

"Not contains"

"Equal"

"Not equal"

"Larger than"

"Smaller than"

"Clear")

FixedFooters = 1

FixedColWidth = 20

FixedRowHeight = 44

FixedFont.Charset = DEFAULT_CHARSET

FixedFont.Color = clWindowText

FixedFont.Height = -32

FixedFont.Name = "Segoe UI"

FixedFont.Style = [fsBold]

FloatFormat = "%.2f"

FloatingFooter.Color = clAppWorkSpace

FloatingFooter.Visible = True

Grouping.AutoCheckGroup = True

Grouping.HeaderColor = clGradientActiveCaption

Grouping.MergeHeader = True

Grouping.ShowGroupCount = True

Grouping.Summary = True

Grouping.SummaryColor = clBtnFace

Grouping.SummaryLine = True

HoverButtons.Buttons = <>

HTMLSettings.ImageFolder = "images"

HTMLSettings.ImageBaseName = "img"

Look = glCustom

PrintSettings.DateFormat = "dd/mm/yyyy"

PrintSettings.Font.Charset = DEFAULT_CHARSET

PrintSettings.Font.Color = clWindowText

PrintSettings.Font.Height = -12

PrintSettings.Font.Name = "Segoe UI"

PrintSettings.Font.Style = []

PrintSettings.FixedFont.Charset = DEFAULT_CHARSET

PrintSettings.FixedFont.Color = clWindowText

PrintSettings.FixedFont.Height = -12

PrintSettings.FixedFont.Name = "Segoe UI"

PrintSettings.FixedFont.Style = []

PrintSettings.HeaderFont.Charset = DEFAULT_CHARSET

PrintSettings.HeaderFont.Color = clWindowText

PrintSettings.HeaderFont.Height = -12

PrintSettings.HeaderFont.Name = "Segoe UI"

PrintSettings.HeaderFont.Style = []

PrintSettings.FooterFont.Charset = DEFAULT_CHARSET

PrintSettings.FooterFont.Color = clWindowText

PrintSettings.FooterFont.Height = -12

PrintSettings.FooterFont.Name = "Segoe UI"

PrintSettings.FooterFont.Style = []

PrintSettings.Centered = False

PrintSettings.PageNumSep = "/"

ScrollWidth = 34

SearchFooter.AlwaysHighLight = True

SearchFooter.ColorTo = clNone

SearchFooter.FindNextCaption = "Find &next"

SearchFooter.FindPrevCaption = "Find &previous"

SearchFooter.Font.Charset = DEFAULT_CHARSET

SearchFooter.Font.Color = clWindowText

SearchFooter.Font.Height = -12

SearchFooter.Font.Name = "Segoe UI"

SearchFooter.Font.Style = []

SearchFooter.HighLightCaption = "Highlight"

SearchFooter.HintClose = "Close"

SearchFooter.HintFindNext = "Find next occurrence"

SearchFooter.HintFindPrev = "Find previous occurrence"

SearchFooter.HintHighlight = "Highlight occurrences"

SearchFooter.MatchCaseCaption = "Match case"

SearchFooter.ResultFormat = "(%d of %d)"

SearchFooter.Visible = True

SelectionColor = clNone

SelectionTextColor = clWindowText

SortSettings.HeaderColor = clWhite

SortSettings.HeaderColorTo = clWhite

SortSettings.HeaderMirrorColor = clWhite

SortSettings.HeaderMirrorColorTo = clWhite

Version = "2.5.1.19"

AutoCreateColumns = True

AutoRemoveColumns = True

Columns = <

item

  Borders = []

  BorderPen.Color = clSilver

  ButtonHeight = 18

  CheckFalse = "N"

  CheckTrue = "Y"

  Color = clWindow

  Font.Charset = DEFAULT_CHARSET

  Font.Color = clWindowText

  Font.Height = -12

  Font.Name = "Segoe UI"

  Font.Style = []

  HeaderFont.Charset = DEFAULT_CHARSET

  HeaderFont.Color = 3881787

  HeaderFont.Height = -12

  HeaderFont.Name = "Segoe UI"

  HeaderFont.Style = []

  PrintBorders = [cbTop, cbLeft, cbRight, cbBottom]

  PrintFont.Charset = DEFAULT_CHARSET

  PrintFont.Color = clWindowText

  PrintFont.Height = -12

  PrintFont.Name = "Segoe UI"

  PrintFont.Style = []

  Width = 20

end

item

  AutoMinSize = 150

  Borders = []

  BorderPen.Color = clSilver

  ButtonHeight = 18

  CheckFalse = "N"

  CheckTrue = "Y"

  Color = clWindow

  EditLength = 25

  FieldName = "Group"

  Font.Charset = DEFAULT_CHARSET

  Font.Color = clWindowText

  Font.Height = -12

  Font.Name = "Segoe UI"

  Font.Style = []

  HeaderFont.Charset = DEFAULT_CHARSET

  HeaderFont.Color = 3881787

  HeaderFont.Height = -12

  HeaderFont.Name = "Segoe UI"

  HeaderFont.Style = []

  MinSize = 150

  PrintBorders = [cbTop, cbLeft, cbRight, cbBottom]

  PrintFont.Charset = DEFAULT_CHARSET

  PrintFont.Color = clWindowText

  PrintFont.Height = -12

  PrintFont.Name = "Segoe UI"

  PrintFont.Style = []

  Width = 646

end

item

  AutoMinSize = 200

  Borders = []

  BorderPen.Color = clSilver

  ButtonHeight = 18

  CheckFalse = "N"

  CheckTrue = "Y"

  Color = clWindow

  FieldName = "Description"

  Fixed = True

  Font.Charset = DEFAULT_CHARSET

  Font.Color = clWindowText

  Font.Height = -12

  Font.Name = "Segoe UI"

  Font.Style = []

  HeaderFont.Charset = DEFAULT_CHARSET

  HeaderFont.Color = clWindowText

  HeaderFont.Height = -12

  HeaderFont.Name = "Segoe UI"

  HeaderFont.Style = []

  PrintBorders = [cbTop, cbLeft, cbRight, cbBottom]

  PrintFont.Charset = DEFAULT_CHARSET

  PrintFont.Color = clWindowText

  PrintFont.Height = -12

  PrintFont.Name = "Segoe UI"

  PrintFont.Style = []

  Width = 204

end

item

  AutoMinSize = 200

  Borders = []

  BorderPen.Color = clSilver

  ButtonHeight = 18

  CheckFalse = "N"

  CheckTrue = "Y"

  Color = clWindow

  EditLength = 128

  FieldName = "GLAccount"

  Fixed = True

  Font.Charset = DEFAULT_CHARSET

  Font.Color = clWindowText

  Font.Height = -12

  Font.Name = "Segoe UI"

  Font.Style = []

  HeaderFont.Charset = DEFAULT_CHARSET

  HeaderFont.Color = 3881787

  HeaderFont.Height = -12

  HeaderFont.Name = "Segoe UI"

  HeaderFont.Style = []

  MinSize = 150

  PrintBorders = [cbTop, cbLeft, cbRight, cbBottom]

  PrintFont.Charset = DEFAULT_CHARSET

  PrintFont.Color = clWindowText

  PrintFont.Height = -12

  PrintFont.Name = "Segoe UI"

  PrintFont.Style = []

  Width = 204

end

item

  AutoMinSize = 100

  AutoMaxSize = 100

  Alignment = taRightJustify

  Borders = []

  BorderPen.Color = clSilver

  ButtonHeight = 18

  CheckFalse = "N"

  CheckTrue = "Y"

  Color = clWindow

  FieldName = "CreditAmount"

  Font.Charset = DEFAULT_CHARSET

  Font.Color = clWindowText

  Font.Height = -12

  Font.Name = "Segoe UI"

  Font.Style = []

  HeaderFont.Charset = DEFAULT_CHARSET

  HeaderFont.Color = 3881787

  HeaderFont.Height = -12

  HeaderFont.Name = "Segoe UI"

  HeaderFont.Style = []

  MinSize = 150

  PrintBorders = [cbTop, cbLeft, cbRight, cbBottom]

  PrintFont.Charset = DEFAULT_CHARSET

  PrintFont.Color = clWindowText

  PrintFont.Height = -12

  PrintFont.Name = "Segoe UI"

  PrintFont.Style = []

  SortStyle = ssFinancial

  Width = 104

end

item

  AutoMinSize = 100

  AutoMaxSize = 100

  Alignment = taRightJustify

  Borders = []

  BorderPen.Color = clSilver

  ButtonHeight = 18

  CheckFalse = "N"

  CheckTrue = "Y"

  Color = clWindow

  FieldName = "DebitAmount"

  Font.Charset = DEFAULT_CHARSET

  Font.Color = clWindowText

  Font.Height = -12

  Font.Name = "Segoe UI"

  Font.Style = []

  HeaderFont.Charset = DEFAULT_CHARSET

  HeaderFont.Color = 3881787

  HeaderFont.Height = -12

  HeaderFont.Name = "Segoe UI"

  HeaderFont.Style = []

  MinSize = 150

  PrintBorders = [cbTop, cbLeft, cbRight, cbBottom]

  PrintFont.Charset = DEFAULT_CHARSET

  PrintFont.Color = clWindowText

  PrintFont.Height = -12

  PrintFont.Name = "Segoe UI"

  PrintFont.Style = []

  SortStyle = ssFinancial

  Width = 104

end>

DataSource = dmData.dsJournal

PageMode = False

InvalidPicture.Data = {

055449636F6E0000010001002020200000000000A81000001600000028000000

2000000040000000010020000000000000100000000000000000000000000000

0000000000000000000000000000000000000000000000000000000000000000

0000000000000000000000006A6A6B256A6A6B606A6A6B946A6A6BC06A6A6BE1

6A6A6BF86A6A6BF86A6A6BE16A6A6BC06A6A6B946A6A6B606A6A6B2500000000

0000000000000000000000000000000000000000000000000000000000000000

0000000000000000000000000000000000000000000000000000000000000000

000000006A6A6B407575769E787879F19F9F9FF6C0C0C0FDDADADAFFEDEDEEFF

FBFBFBFFFBFBFBFFEDEDEEFFDADADAFFC0C0C0FD9F9F9FF6787879F17575769E

6A6A6B4000000000000000000000000000000000000000000000000000000000

000000000000000000000000000000000000000000000000000000006A6A6B22

7C7C7C98888889F0BDBDBDFCE9E9EBFED9D9E9FEB5B5DDFE8B8BCDFE595AB7FF

3739A8FF2B2CA4FF4A49B1FF7171C1FFA1A2D7FFD3D3E8FFEAEAEBFEBEBEBFFC

888889F07C7C7C986A6A6B220000000000000000000000000000000000000000

0000000000000000000000000000000000000000000000006A6A6B43838383D8

B7B7B8FAECECEFFEC0C0DFFF7977C4FF2221A0FF12129BFF1010A4FF0C0CA8FF

0A0AACFF0A0AB4FF0A0AB9FF0D0DBEFF0F0FB1FF1111A6FF5656B8FFAEADDCFF

ECECEFFEB7B7B8FA838383D86A6A6B4300000000000000000000000000000000

00000000000000000000000000000000000000006A6A6B4E878788EAD3D3D3FE

CACAE8FF4443B0FF171799FF11119CFF0C0C98FF0B0B9BFF0B0BA0FF0A0AA6FF

0909ACFF0909B2FF0808BAFF0707BFFF0B09C8FF0D0DCEFF1111CCFF1010AFFF

4A49B2FFCFCFEBFFD3D3D3FE878788EA6A6A6B4E000000000000000000000000

000000000000000000000000000000006A6A6B43878788EAE1E1E1FFA8A8DAFF

2323A0FF15159CFF0D0D92FF0C0C95FF0C0C99FF0B0B9EFF0B0BA0FF0A0AA6FF

0909ACFF0909B2FF0808B8FF0808BCFF0808C3FF0C0CC9FF0C0CD0FF0D0DD6FF

1313CFFF2222A9FFAFAFDEFFE1E1E1FF878788EA6A6A6B430000000000000000

0000000000000000000000006A6A6B22838383D8D3D3D3FEA8A8D9FF2020A4FF

13139BFF0C0C92FF0C0C95FF0C0C97FF0C0C99FF0B0B9EFF0B0BA0FF0A0AA4FF

0A0AA9FF0909B0FF0808B4FF0808BBFF0707C0FF0A0AC6FF0909CCFF0C0CD3FF

0D0DD8FF1313D3FF1A1AA8FFAEADDEFFD4D4D4FE838383D86A6A6B2200000000

0000000000000000000000007C7C7C98B7B7B8FACACAE8FF2524A3FF13139FFF

0C0C97FF0C0C95FF0C0C95FF0C0C91FF0C0C95FF0B0B9EFF0B0BA0FF0A0AA4FF

0A0AA8FF0909ADFF0909B2FF0808B8FF0808BCFF0707C0FF0808BCFF0707C5FF

0C0CD3FF0D0DD7FF1212D1FF2020A7FFCDCDEBFFB8B8B9FA7C7C7C9800000000

00000000000000006A6A6B40888889F0ECECEFFE4545B1FF1616A4FF0B0B9BFF

0C0C99FF0C0C96FF3333A2FFB9B9D0FF393A9BFF0C0C95FF0B0BA1FF0A0AA4FF

0A0AA7FF0A0AABFF0909B0FF0808B4FF0808B7FF2F2FC2FFAEAEE2FF4B4BBFFF

0707BEFF0B0BD1FF0C0CD3FF1413CCFF4848B1FFECECEFFE888889F06A6A6B40

00000000000000007575769EBFBFBFFD9B9BD5FF1C1CA6FF0C0CA1FF0B0B9FFF

0B0B9AFF3535A7FFB5B5BEFFE6E6DFFFEDEDEFFF3C3C9CFF0C0C97FF0A0AA4FF

0A0AA6FF0A0AA9FF0909ADFF0909B0FF2626B5FFCECEDEFFFFFFFBFFEEEEF1FF

4848BAFF0808BCFF0A0ACDFF0B0BCEFF1111ABFFBEC0E0FFBFC0BFFD7575769E

000000006A6A6B25787879F1E3E3E5FE4646B2FF1414A8FF0A0AA4FF0B0BA0FF

2121A9FFBDBDCAFFD0D0C8FFC5C5C5FFE3E3E1FFEDEDEFFF3E3E9EFF0C0C98FF

0A0AA6FF0A0AA8FF0A0AA9FF2B2BB0FFC0C0CDFFEAEAE2FFEBEBEBFFFEFEF8FF

EDEDEEFF2828BDFF0707C4FF0809C7FF0F0FC4FF8788CBFFEBEBECFE79797AF1

6A6A6B256A6A6B609D9E9DF6D6D7E4FF3A3AB3FF1212ADFF0A0AA8FF0A0AA4FF

1313AAFFABABCFFFD6D6CBFFCACACAFFC6C6C6FFE4E4E0FFEEEEEFFF3F3FA0FF

0C0C99FF0A0AA6FF2828ABFFB2B2BFFFD8D8CEFFD6D6D8FFE0E0E0FFF6F5EDFF

D1D1EDFF1E1CC0FF0707BEFF0707BFFF0707C0FF2120AAFFD3D5E9FE9FA0A0F6

6A6A6B606A6A6B94BDBDBDFBBABBDCFF3A39B7FF2F2FB8FF0909ADFF0A0AA9FF

0A0AA6FF1515ACFFADADCFFFD6D6CBFFCBCBCAFFC6C6C6FFE4E4E1FFEEEEEFFF

3838A1FF2222A2FFACABB8FFC8C8C0FFC7C7C8FFCDCDCDFFE1E1D9FFC8CAE1FF

2424BCFF0808B4FF0808B9FF0808BAFF0808BBFF0F0EABFFA1A2D5FEC0C0C0FC

6A6A6B946A6A6BC0D9D8D7FE9999D1FF3838BBFF3636BCFF2C2CB7FF0909ADFF

0A0AA9FF0A0AA4FF1C1CAFFFB1B1CFFFD6D6CBFFCCCCCBFFC7C7C7FFE4E4E1FF

ECECEEFFACACB7FFC2C2BCFFBEBEBFFFC0C0C0FFCFCFC6FFC1C1D5FF2727B8FF

0909ACFF0909B2FF0909B2FF0909B4FF0808B4FF0E0EB5FF6E6EBFFFD9D9D9FE

6A6A6BC06A6A6BE1EBEAEBFF7D7CC7FF3838BFFF3434BEFF3536BEFF2A2AB8FF

0909B0FF0909ACFF0A0AA8FF1C1CB1FFB2B2D0FFD7D7CCFFCBCBCBFFC7C7C8FF

C8C8C3FFC6C6C3FFBFBFC1FFBDBDBDFFC5C5BCFFB8B8CEFF2929B5FF0A0AA8FF

0909ACFF0909ADFF0909AFFF0909AFFF0909AFFF0C0CB0FF4747AFFFECECEDFF

6A6A6BE16A6A6BF8F9F9F9FF6666C1FF3838C4FF3535C2FF3434C0FF3535BEFF

3030BCFF1313B4FF0909ADFF0A0AA8FF1E1EB3FFAAAAD0FFD3D3CDFFCCCCCCFF

C8C8C8FFC3C3C3FFC2C2C1FFC4C4BFFFB2B2CBFF2B2BB4FF0A0AA4FF0A0AA8FF

0A0AA8FF0A0AA9FF0A0AA9FF0A0AA9FF0A0AA9FF0B0BA9FF3131A6FFFAFAFAFF

6A6A6BF86A6A6BF8FBFBFBFF5959BEFF3B3BCAFF3A3AC8FF3737C4FF3535C2FF

3636C0FF3636BEFF2323B8FF0909B1FF0A0AA7FF4949BEFFD6D6D4FFD3D3D1FF

CDCDCDFFC8C8C8FFC4C4C3FFEDEDEDFF5F5FB3FF0C0C98FF0A0AA7FF0A0AA6FF

0A0AA6FF0A0AA6FF0A0AA4FF0A0AA6FF0A0AA4FF0B0BA4FF2D2DA6FFFBFBFBFF

6A6A6BF86A6A6BE1EDEDEEFF7F80CBFF4041CCFF3C3CCAFF3A3AC8FF383AC8FF

3838C4FF3636C2FF3939C0FF2123B7FF4A4AC2FFCBCBDEFFE0E0DCFFD6D6D6FF

D2D2D3FFCDCDCEFFC9C9C9FFE2E2E1FFF1F1F2FF4242A3FF0C0C99FF0A0AA4FF

0A0AA4FF0A0AA4FF0B0BA3FF0B0BA3FF0B0BA1FF0E0EA1FF4443B0FFEDEDEEFF

6A6A6BE16A6A6BC0DADADAFF9C9BD5FE4949CDFF3E3DD0FF3C3DCEFF3C3CCAFF

3A3AC8FF3B39C7FF2828BDFF5C5CCCFFE5E5EDFFF4F4EDFFE5E5E6FFDEDEDEFF

DCDCD9FFD9D9D3FFCDCDCDFFC8C8C8FFE5E5E1FFF1F1F3FF3F3FA0FF0C0C99FF

0A0AA4FF0B0BA1FF0B0BA0FF0B0BA0FF0B0B9FFF1313A2FF6B6BC0FFDADADAFF

6A6A6BC06A6A6B94C0C0C0FDBDBAE1FE5655CFFF4141D4FF3F3FD2FF3F3FCEFF

3D3DCCFF2C2AC3FF5E5ED3FFEBEBF6FFFFFFFAFFF1F1F1FFEDEDEEFFF0F0E9FF

D2D2E6FFBDBDD6FFDADAD3FFCFCFCFFFC9C9CAFFE5E5E2FFF1F1F3FF3A3AA0FF

0C0C98FF0B0BA3FF0B0B9FFF0B0B9EFF0B0B9EFF1C1CA4FF9C9CD3FFC1C1C1FD

6A6A6B946A6A6B609F9F9FF6DAD9EAFF6B6BCFFF4444D7FF4143D6FF4242D3FF

3434CDFF6464DBFFEFEFFFFFFFFFFFFFFCFCFCFFF6F6F6FFFCFCF4FFE2E1F0FF

5050CCFF4040C1FFC3C3DBFFE1E1D8FFD4D4D5FFCFCFCFFFE8E8E5FFF2F2F4FF

4040A2FF0C0C99FF0F0FA2FF0F0FA0FF0F0F9DFF302FA9FFD1D1E8FEA0A0A0F6

6A6A6B606A6A6B25787879F1E9E9EBFEA7A7DAFF6060DBFF4547DBFF3C3CD6FF

5857DEFFF2F2FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE8E8F8FF5B5BD4FF

2828BDFF2A2BBDFF4949C5FFC3C3DBFFE4E4DAFFD5D5D5FFCECED0FFE8E8E5FF

F4F4F4FF4949AFFF2121A6FF2A2AA6FF2C2BA9FF5557B8FFEAEAECFE787879F1

6A6A6B25000000007575769EBEBEBEFDC9CAE6FF7A79DBFF4C4CDFFF4141DBFF

5757E0FFEAEAFFFFFFFFFFFFFFFFFFFFFFFFFFFFE8E7FFFF5B5BD7FF2E2EC6FF

3E3EC9FF3A3AC5FF2C2EC1FF4A49C8FFC2C2DDFFE3E3DAFFD5D5D4FFDADAD3FF

CACBD9FF4747BBFF2525ADFF2C2BACFF3332AEFFA5A4D8FFBFBFBFFD7575769E

00000000000000006A6A6B40888889F0ECECEFFE9696D6FF7B7BE3FF4D4BE0FF

4141DBFF5F5FE6FFE7E7FFFFFFFFFFFFE9E9FFFF5A5ADCFF3333CAFF4242CFFF

4040CBFF3D3DC9FF3D3EC8FF3030C2FF4848C9FFC0C0DDFFECEEDEFFD0D0E0FF

5554C7FF2828B3FF3232B4FF3434B1FF5453B7FFECECEFFE888889F06A6A6B40

0000000000000000000000007C7C7C98B7B7B8FAD0D0ECFF8F8FDBFF6868E3FF

4E4EE2FF3E40DBFF6565E9FFB2B2F7FF6565E4FF393BD2FF4646D7FF4343D4FF

4343D1FF4242CFFF4040CBFF3F3FCAFF3333C4FF4E4ECBFF9E9EE2FF5C5BCFFF

292ABAFF3636BCFF3938B8FF3F3EB1FFCBCBE9FFB7B7B8FA7C7C7C9800000000

0000000000000000000000006A6A6B22838383D8D3D3D3FEB5B5E2FF9E9EE4FF

6766E2FF4E50E6FF4646E0FF3D3DDAFF4444DCFF4B4BDCFF4848DBFF4847D9FF

4646D5FF4443D3FF4343D1FF4242CFFF4143CDFF3A3AC8FF312FC5FF3535C3FF

3C3CC3FF3D3DBEFF403FB5FFACACDCFFD3D3D3FE838383D86A6A6B2200000000

000000000000000000000000000000006A6A6B43878788EAE1E1E1FFB5B5E2FF

A7A6E4FF7877E5FF5151E5FF4F4FE4FF4E4EE2FF4D4DE0FF4C4CDEFF4B4BDCFF

4949DBFF4848D7FF4747D5FF4545D3FF4545D1FF4343CFFF4242CCFF3F3FCBFF

4343C2FF4645B6FFADADDCFFE1E1E1FF878788EA6A6A6B430000000000000000

00000000000000000000000000000000000000006A6A6B4E878788EAD3D3D3FE

D0D0ECFFAAA9DFFFA2A2ECFF6565E3FF5151E6FF4F4FE4FF4F4DE4FF4D4DE0FF

4D4DDFFF4D4DDCFF4C49DBFF4A4AD8FF4749D6FF4747D4FF4949CBFF4B4BC3FF

8E8ED0FFCDCCE8FFD3D3D3FE878788EA6A6A6B4E000000000000000000000000

0000000000000000000000000000000000000000000000006A6A6B43838383D8

B7B7B8FAECECEFFEC3C2E5FFADAEE1FF9E9DE8FF6F6FE0FF5C5CE1FF5452E2FF

5051E1FF4F4FDFFF4F4FDBFF5150D6FF5151CFFF5F5FC8FFA1A1D3FEC7C8E0FE

E4E4E7FEB7B7B8FA838383D86A6A6B4300000000000000000000000000000000

000000000000000000000000000000000000000000000000000000006A6A6B22

7C7C7C98888889F0BFBFBFFDEBEBECFED8D9EBFEBDBDE4FEA8A7DCFF9695D7FF

8886D4FF7F7DCEFF8C8BD2FFA1A2D9FFC0BEE1FED9D9EAFEEAEAECFEBFBFBFFD

888889F07C7C7C986A6A6B220000000000000000000000000000000000000000

0000000000000000000000000000000000000000000000000000000000000000

000000006A6A6B407575769E787879F19F9F9FF6C0C0C0FDDADADAFFEDEDEEFF

FBFBFBFFFBFBFBFFEDEDEEFFDADADAFFC0C0C0FD9F9F9FF6787879F17575769E

6A6A6B4000000000000000000000000000000000000000000000000000000000

0000000000000000000000000000000000000000000000000000000000000000

0000000000000000000000006A6A6B256A6A6B606A6A6B946A6A6BC06A6A6BE1

6A6A6BF86A6A6BF86A6A6BE16A6A6BC06A6A6B946A6A6B606A6A6B2500000000

0000000000000000000000000000000000000000000000000000000000000000

00000000FFC003FFFF0000FFFC00003FF800001FF000000FE0000007C0000003

C000000380000001800000010000000000000000000000000000000000000000

0000000000000000000000000000000000000000000000000000000080000001

80000001C0000003C0000003E0000007F000000FF800001FFC00003FFF0000FF

FFC003FF}

ShowUnicode = False

ExplicitWidth = 1272

ExplicitHeight = 765

ColWidths = (

RowHeights = (

44

44)

end

brunofierens · May 31, 2023, 8:26am

How is your design-time editor configured for DPI in your IDE?
Can you attach at least your DFM file? What you pasted here isn't usable without a lot of manual work to copy & paste in the design-time editor due to this (bad) formatting here.

Wild_Nathan · May 31, 2023, 4:08pm

Here are IDE DPI Settings:

I tried building the application with LowDPI and there was no change.

Here is ths dfm: Dropbox - reviewjournal.dfm - Simplify your life

brunofierens · June 1, 2023, 2:35pm

I opened this DFM file here, created a form with it and inserted some dummy data in the grid, but I could not see an unexpected behavior.

Project1.zip (96.4 KB)

Wild_Nathan · June 1, 2023, 9:06pm

I am at a loss to explain why, but I simply deleted the grid from my project and pasted it in from yours, then deleted the columns and reconnected it to my dataset. It works now, as it did before. Oddly the font settings seem to be ignored? Perhaps I am missing something. I have set ActiveCellFont, Font, and FixedFont to 14pt and it has no effect at run-time. The column title captions look to be showing in 7 or 8pt and the cells/fixed footer row look to be 9.

brunofierens · June 2, 2023, 7:45am

The only thing I can think of is

ParentFont = true so it adopts parent font settings
VCL framework itself performs font size recalculations based on difference between DPI at design-time and DPI at run-time.