Select Git revision
StatsLogFormUnit.dfm
-
Rob Swindell authoredRunning SBBSCTRL on Windows 11 with a 4K monitor looked horrible. The default font sizes varied widely - I'm not sure why this wasn't apparent before now. And the default font ("MS Sans Serif") is no longer included in modern Windows versions, so when choosing a Log font, the pre-selected font was just blank. So change use of "MS Sans Serif" everywhere to "Microsoft Sans Serif" which appears to have been around since Win95 and be the preferred alternative. I would consider Segoe, but that wasn't introduced into Windows until Vista and I'm not sure (yet) what troubles that might introduce. I'll experiment with a WinXP VM maybe and find out.Rob Swindell authoredRunning SBBSCTRL on Windows 11 with a 4K monitor looked horrible. The default font sizes varied widely - I'm not sure why this wasn't apparent before now. And the default font ("MS Sans Serif") is no longer included in modern Windows versions, so when choosing a Log font, the pre-selected font was just blank. So change use of "MS Sans Serif" everywhere to "Microsoft Sans Serif" which appears to have been around since Win95 and be the preferred alternative. I would consider Segoe, but that wasn't introduced into Windows until Vista and I'm not sure (yet) what troubles that might introduce. I'll experiment with a WinXP VM maybe and find out.
StatsLogFormUnit.dfm 2.35 KiB
object StatsLogForm: TStatsLogForm
Left = 376
Top = 302
Width = 783
Height = 540
Caption = 'BBS Statistics Log'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Microsoft Sans Serif'
Font.Style = []
Icon.Data = {
0000010001002020100000000000E80200001600000028000000200000004000
0000010004000000000080020000000000000000000000000000000000000000
000000008000008000000080800080000000800080008080000080808000C0C0
C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
0000000000000000000000000000000000000000007777770000000000000000
0000000000000007000000000000000000000000000000070000000000000000
0000000000777007000000000000000000077070007770070000700000000000
0077000700787000000007000000000007708000077877000070007000000000
07088807777777770777000700000000008F88877FFFFF077887700700000000
00088888F88888FF08870070000000000000880888877778F070007000000007
77088888880007778F770077777000700008F088007777077F07000000700700
008F08880800077778F7700000700708888F0880F08F807078F7777700700708
F88F0780F070F07078F7887700700708888F0780F077807088F7777700700700
008F0788FF00080888F77000007000000008F0780FFFF0088F77007000000000
0008F07788000888887700700000000000008F07788888880870007000000000
00088FF0077788088887000700000000008F888FF00000F87887700700000000
0708F8088FFFFF88078700700000000007708000088888000070070000000000
0077007000888007000070000000000000077700008F80070007000000000000
0000000000888007000000000000000000000000000000070000000000000000
000000000777777700000000000000000000000000000000000000000000FFFF
FFFFFFFC0FFFFFFC0FFFFFF80FFFFFF80FFFFE180E7FFC00043FF800001FF800
000FF800000FFC00001FFE00001FE0000001C000000180000001800000018000
00018000000180000001FC00001FFC00001FFE00001FFC00000FF800000FF800
001FF800003FFC180C7FFE380EFFFFF80FFFFFF80FFFFFF80FFFFFFFFFFF}
OldCreateOrder = False
Position = poScreenCenter
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 16
object Log: TMemo
Left = 0
Top = 0
Width = 775
Height = 507
Align = alClient
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = 'Courier New'
Font.Style = []
ParentFont = False
ReadOnly = True
ScrollBars = ssBoth
TabOrder = 0
WordWrap = False
end
end