HighDpi Issue in Html Hints

Using the AdvStringGrid I got a "double scaling issue" in html hints: the Font.Size is scaled in blocks in AdvGrid.pas like

{$IFDEF DELPHIXE14_LVL}
if Assigned(Application.MainForm) then
begin
Canvas.Font.Size := Round(9*(Application.MainForm.CurrentPPI/DesignPPI));
end;
{$ENDIF}

whereas the font is also scaled later because TFont.PixelPerInch is also considered in painting routines.

best regards

How exactly can this be reproduced?
I retested this here with Delphi 11 and 150% DPI screen and latest TMS VCL UI Pack but I cannot see an issue with HTML hints on the grid.

This happens only if you use html tags!

Which is of course what I tested.

This code Project11.zip (1.9 KB)
leads to


on my system, which is double scaled.

Cannot be reproduced


I suggest to begin with using latest TMS VCL UI Pack release.

Hmm, strange ... I'm using Delphi 11.3 Patch 1, TMS VCL UI Pack 12.2.1.1, Windows 10 22H2 (150% scaled, same effect if I compile without scaling). Same effect with compiled exe.
Any ideas?

Are you 100% sure you effectively compile against the latest version code, i.e. no more old version .PAS file(s) in your library path?

Yes. After uninstalling the path "TMS VCL UI Pack" is gone and I reinstalled and auto-compiled it.
Strange ...

This is your project we compiled and tested here
Project11.zip (2.2 MB)