如何更改Delphi中mainmenu项的fontsize？

Question

人们会认为MainMenu会有一个Font属性,因为只有其他所有东西,例如Buttons,Labels等.

Answer 1

比如写,

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

并确保OwnerDraw您的属性TMainMenu设置为true.