Skip to content

Commit 9a68fb6

Browse files
committed
* Fix computenodeheight when drawing horizontal line / remove redundant check
1 parent 2378094 commit 9a68fb6

File tree

1 file changed

+2
-0
lines changed

1 file changed

+2
-0
lines changed

Source/VirtualTrees.pas

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -33765,6 +33765,8 @@ function TCustomVirtualStringTree.ComputeNodeHeight(Canvas: TCanvas; Node: PVirt
3376533765
DrawFormat := DrawFormat or DT_LEFT;
3376633766
DrawText(Canvas.Handle, PChar(S), Length(S), PaintInfo.CellRect, DrawFormat);
3376733767
Result := PaintInfo.CellRect.Bottom - PaintInfo.CellRect.Top;
33768+
if toShowHorzGridLines in TreeOptions.PaintOptions then
33769+
Inc(Result);
3376833770
end;
3376933771

3377033772
//----------------------------------------------------------------------------------------------------------------------

0 commit comments

Comments
 (0)