Os menus do Delphi parecem sempre ter fontes que voltam ao padrão (8, Tahoma) O problema，Dúvidas do exterior，mas sem solução。A solução temporária que posso pensar no momento é definir uma tecla de função (Pode ser definido como tecla de atalho)，Permitir que o usuário encontre um tamanho de fonte pequeno，Redefinir o tamanho da fonte por conta própria。(Durante o teste, a fonte do menu pode ser alterada de volta ao valor padrão alterando a porcentagem do tamanho de exibição do Windows)
procedure Tmainform.N93Click(Sender: TObject); begin Screen.MenuFont.Size := 12; xxxxxx.BringToFront; // 改變畫面焦點，以刷新選單畫面。 end;
Referência [link]
- Repintura do menu de força do Delphi VCL – Stack Overflow
- de vez em quando: Alargamento da fonte Delphi MainMenu e solução ausente do ícone do prompt Menu Checked
