Forum: Object-Pascal / Delphi-Language
by dstein,
18. Dez 2023
"Ich werfe mal Application.DefaultFont ins Rennen "
Gibt den Font der in Delphi eingestelltem Font zurück, bei mir "Tahoma".
Forum: Object-Pascal / Delphi-Language
by dstein,
18. Dez 2023
Hallo ihe Beide,
Danke für die Antwort. Passt :-)
edt_font.Text:=Screen.CaptionFont.Name;
MyRichedit.Font := Screen.CaptionFont;
Und wieder etwas gelernt, Danke.
Forum: Object-Pascal / Delphi-Language
by dstein,
18. Dez 2023
Moin Zusammen,
ich möchte gerne das Windows Standard Font herausfinden und übernehmen.
Mit "ComboBox1.Items := Screen.Fonts;" erhalte ich eine Liste alle Fonts.
Ich brauche keine Liste sondern wie komme ich an das aktive (default) Windows-Font (bsp. Calibri)?