Delphi – menu font smaller

Delphi menus seem to always have fonts that go back to default (8, Tahoma) The problem,Questions from abroad,but no solution。The temporary solution I can think of at the moment is to set a function key (Can be set as hotkey),Let user encounter small font size,Reset font size by yourself。(During testing, the menu font can be changed back to the default value by changing the Windows display size percentage)

procedure Tmainform.N93Click(Sender: TObject);
  Screen.MenuFont.Size := 12;
  xxxxxx.BringToFront; // 改變畫面焦點,以刷新選單畫面。


Leave a Comment

Please note: Comment moderation is enabled and may delay your comment. There is no need to resubmit your comment.