Regarding issue :
https://bugs.freepascal.org/view.php?id=37901
I improved the property name/value hints in OI.
I had to comment out code that selects FValueFont or FDefaultValueFont. The relevant code is below.
Q: How to get a font with negated color?
Does it even make sense to tweak it? The hint works OK with the default color now.
I ask in case somebody knows the topic well.

I did not study what Editor.ValueIsStreamed means. It never triggered in my tests.

Regards,
Juha

---

  procedure DoShow(pt: TPoint); inline;
  //var HintFont: TFont;
  begin
    if WidgetSet.GetLCLCapability(lcTransparentWindow)=LCL_CAPABILITY_NO

then

      Inc(pt.Y, fPropRow.Height);

{ By Juha :
FValueFont and FDefaultValueFont are nearly unreadable. We should maybe get their negated color as the hint background is black.

    if HintTypepehValue then
      HintFont := Screen.HintFont
    else
    if fPropRow.Editor.ValueIsStreamed then
      HintFont:=FValueFont
    else
      HintFont:=FDefaultValueFont;  }
    FHintManager.ShowHint(ClientToScreen(pt), TheHint, False{, HintFont});
    if FHintManager.CurHintWindownil then
      FHintManager.CurHintWindow.OnMouseLeave := @HintMouseLeave;
  end;
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus/attachments/20201016/72dd61b5/attachment-0001.html>