Use less indentation in db tree and less height per node in all trees. Fixes issue #2262.

This commit is contained in:
Ansgar Becker
2010-12-29 22:44:12 +00:00
parent b0048cff64
commit c5ae894951
2 changed files with 2 additions and 1 deletions

View File

@ -1795,7 +1795,7 @@ begin
// Resize hardcoded node height to work with different DPI settings
VT.BeginUpdate;
SingleLineHeight := GetTextHeight(VT.Font);
VT.DefaultNodeHeight := SingleLineHeight * MultiLineCount + 6;
VT.DefaultNodeHeight := SingleLineHeight * MultiLineCount + 5;
// The header needs slightly more height than the normal nodes
VT.Header.Height := Trunc(SingleLineHeight * 1.5);
// Apply new height to multi line grid nodes

View File

@ -413,6 +413,7 @@ object MainForm: TMainForm
HotCursor = crHandPoint
Images = ImageListMain
IncrementalSearch = isInitializedOnly
Indent = 12
ParentShowHint = False
PopupMenu = popupDB
ShowHint = True