mirror of
https://git.vladimir.cc/vladimir/ewsdr.git
synced 2026-08-25 20:37:33 +00:00
fix(settings): prevent duplicate DPI scaling
This commit is contained in:
@@ -767,6 +767,13 @@ var
|
||||
MaxW, MaxH: Integer;
|
||||
begin
|
||||
inherited CreateNew(AOwner);
|
||||
// Вся геометрия этой формы строится кодом и уже переводится из 96-DPI
|
||||
// координат через DpiScale. Если оставить TCustomForm.Scaled=True, LCL
|
||||
// после конструктора повторно применит monitor DPI ко всей форме:
|
||||
// при Windows 125% получится 1.25 * 1.25 = 1.5625. Кроме общего раздувания,
|
||||
// это смешивает два масштаба с RelayoutCalTab, который вызывается позднее,
|
||||
// и строки Calibration начинают наезжать на поясняющий текст.
|
||||
Scaled := False;
|
||||
Caption := 'Settings';
|
||||
if AOwner is TCustomForm then
|
||||
begin
|
||||
|
||||
Reference in New Issue
Block a user