How to change the font of the main objects in Delphi?

Question

One would think that for MainMenu there will be a Font property, since it is for everything else, for example. Buttons, shortcuts, etc.

Answer 1

Write for example

procedure TForm2.FormCreate(Sender: TObject); begin Screen.MenuFont.Name := 'Arial Black'; end; 

and make sure that the OwnerDraw property of your TMainMenu set to true .

Answer 2

Take a look at the TScreen.MenuFont property.