Issue #1482: high DPI related: call RestoreListSetup in any FormShow event, not FormCreate, move FixVT again to FormShow

This commit is contained in:
Ansgar Becker
2025-03-30 12:41:06 +02:00
parent b2b5cf6ad3
commit b266d1475e
5 changed files with 12 additions and 10 deletions

View File

@ -326,7 +326,7 @@ begin
for i := 0 to ValueList.Count - 1 do
begin
ColWidth := MakeInt(ValueList[i]);
//ColWidth := RoundCommercial(ColWidth * OwnerForm.ScaleFactor);
ColWidth := OwnerForm.ScaleDesignToForm(ColWidth);
// Check if column number exists and width is at least 1 pixel
if (List.Header.Columns.Count > i) and (ColWidth > 0) and (ColWidth < 1000) then
List.Header.Columns[i].Width := ColWidth;