Issue #2249: call FixVT() in FormCreate consequently, so the trees do not change their row height after the second use. Also increase TextMargin and reduce Margin.

This commit is contained in:
Ansgar Becker
2025-09-16 20:40:49 +02:00
parent fd1788d370
commit ec2844407d
7 changed files with 23 additions and 25 deletions

View File

@@ -272,6 +272,10 @@ begin
editName.MaxLength := NAME_LEN;
FAlterRestrictedMessageDisplayed := False;
btnSave.Hint := ShortCutToText(MainForm.actSaveSQL.ShortCut);
FixVT(listColumns);
FixVT(treeIndexes);
FixVT(listForeignKeys);
FixVT(listCheckConstraints);
end;
@@ -283,10 +287,6 @@ begin
inherited;
FLoaded := False;
FixVT(listColumns);
FixVT(treeIndexes);
FixVT(listForeignKeys);
FixVT(listCheckConstraints);
// Try the best to auto fit various column widths, respecting a custom DPI setting and a pulldown arrow
listColumns.Header.Columns[2].Width := Mainform.Canvas.TextWidth('GEOMETRYCOLLECTION') + 6*listColumns.TextMargin;
listColumns.Header.Columns[7].Width := Mainform.Canvas.TextWidth('AUTO_INCREMENT') + 4*listColumns.TextMargin;