Einzelnen Beitrag anzeigen

Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.029 Beiträge
 
Delphi 12 Athens
 
#7

AW: Windows default Font herausfinden und übernehmen

  Alt 18. Dez 2023, 15:49
Genauer: Gibt das in DefFontData eingestellte zurück (hier aus Delphi 12):
Delphi-Quellcode:
  // New TFont instances are intialized with the values in this structure:
  DefFontData: TFontData = (
    Handle: 0;
    Height: 0;
    Orientation: 0; { No rotation }
    Pitch: fpDefault;
    Style: [];
    Charset : DEFAULT_CHARSET;
    Name: 'Segoe UI');
Allerdings ist das eben auch eine Variable und kann im Programm überschrieben werden.
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat