From 8088c1378b6556930198be3c7954b039490c6514 Mon Sep 17 00:00:00 2001
From: juha <juha@lazarus-ide.org>
Date: Fri, 16 Oct 2020 12:53:32 +0000
Subject: [PATCH] IdeIntf: Improve a comment about hint fonts added in previous
 commit.

git-svn-id: trunk@64027 -
---
 components/ideintf/objectinspector.pp | 13 ++++++++-----
 1 file changed, 8 insertions(+), 5 deletions(-)

diff --git a/components/ideintf/objectinspector.pp b/components/ideintf/objectinspector.pp
index 4958bb0494..d21f0579f4 100644
--- a/components/ideintf/objectinspector.pp
+++ b/components/ideintf/objectinspector.pp
@@ -2401,14 +2401,17 @@ var
   fPropRow: TOIPropertyGridRow;
 
   procedure DoShow(pt: TPoint); inline;
-  //var
-  //  HintFont: TFont;
+  //var HintFont: TFont;
   begin
     if WidgetSet.GetLCLCapability(lcTransparentWindow)=LCL_CAPABILITY_NO then
       Inc(pt.Y, fPropRow.Height);
-{    if HintType<>pehValue then      By Juha :
-      HintFont := Screen.HintFont <- This is not usable at least in my Linux+KDE.
-    else                             Tested with GTK2 and QT5 bindings.
+{ By Juha :
+  FValueFont and FDefaultValueFont are nearly unreadable.
+  We should maybe get their negated color as the hint background is black.
+
+    if HintType<>pehValue then
+      HintFont := Screen.HintFont
+    else
     if fPropRow.Editor.ValueIsStreamed then
       HintFont:=FValueFont
     else