Hey,
TJvMainMenu (line 1258) and TJvPopupMenu (line 1839) use the font given by tagNONCLIENTMETRICS.lfMenuFont, but they should use TScreen.MenuFont instead.
BTW, both object correctly use TScreen.MenuFont for measuring menu item (line 1300 and 1881, respectively).
Workaround is simple, just replace SetDefaultMenuFont(Canvas.Font); with FCanvas.Font:=Screen.MenuFont on lines 1258 and 1839.
IMO, Function SetDefaultMenuFont is irrelevant here.
Best regards,

Additional Information

Tags

No tags attached.

Attached Files

Relationships

Relationships

Notes

(0021517)
obones (administrator)2018-07-18 15:51

Could you check if the issue is still present in the latest GIT content? If yes, please provide the zipped sources of an application showing this.