Einzelnen Beitrag anzeigen

Papaschlumpf73

Registriert seit: 3. Mär 2014
Ort: Berlin
416 Beiträge
 
Delphi 12 Athens
 
#7

AW: Schriftgröße des Hauptmenüs verändert sich

  Alt 23. Jul 2024, 16:07
Das wollte ich jetzt auch mal ausprobieren und habe die paar Zeilen von kdf in die Projektdatei eingefügt. Bei mir passiert da aber gar nichts; die Werte werden komplett ignoriert. Woran kann das liegen?
begin
screen.MessageFont.Size := 12;
screen.HintFont.Size := 12;
screen.MenuFont.Size := 12;
Application.Initialize;
....

Glaube, das muß vor Application.Initialize stehen.
Genauso habe ich es auch gemacht. Einfach ein neues Projekt erzeugt und die paar Zeilen eingefügt:
Delphi-Quellcode:
program Project1;

uses
  Vcl.Forms,
  Unit1 in 'Unit1.pas{Form1};

{$R *.res}

begin
  screen.MessageFont.Size := 14;
  screen.HintFont.Size := 14;
  screen.MenuFont.Size := 14;

  Application.Initialize;
  Application.MainFormOnTaskbar := True;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.
In Form1 hab ich ein TMainMenu und eine MessageBox und ShowMessage ausprobiert. Hat nach wie vor alles Schriftgröße 9.
  Mit Zitat antworten Zitat