Skip to content
Permalink
Browse files

Increase height of nodes in VirtualTree's even more, after having don…

…e that for #468. Closes #557.
  • Loading branch information...
ansgarbecker committed Mar 2, 2019
1 parent 548553e commit bfcb7c2c749552a6685ad03b923f75c52b46db94
Showing with 1 addition and 1 deletion.
  1. +1 −1 source/apphelpers.pas
@@ -1462,7 +1462,7 @@ procedure FixVT(VT: TVirtualStringTree; MultiLineCount: Word=1);
begin
// This is called either in some early stage, or from preferences dialog
VT.BeginUpdate;
SingleLineHeight := GetTextHeight(VT.Font) + 5;
SingleLineHeight := GetTextHeight(VT.Font) + 7;
// Multiline nodes?
VT.DefaultNodeHeight := SingleLineHeight * MultiLineCount;
VT.Header.Height := SingleLineHeight;

0 comments on commit bfcb7c2

Please sign in to comment.
You can’t perform that action at this time.