Windows default Font herausfinden und übernehmen

Thema durchsuchen

Ansicht

Themen-Optionen

Windows default Font herausfinden und übernehmen

Ein Thema von dstein · begonnen am 18. Dez 2023 · letzter Beitrag vom 18. Dez 2023

Vorheriger Beitrag

Nächster Beitrag

dstein

Registriert seit: 28. Jul 2005
Ort: Dormagen
51 Beiträge

Delphi 10.2 Tokyo Enterprise

Windows default Font herausfinden und übernehmen

18. Dez 2023, 13:14

Delphi-Version: 5

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)?

Dirk
- Lang ist der Weg durch Lehren, kurz und wirksam durch Beispiele.
(Seneca, röm. Dichter u. Phil., 4 v. Chr. - 65 n.Chr.) -