SystemFont auslesen...

[TimonWorld]

Hallo!

Weiß jemand, wie ich die Standard-Font von Windows auslese???

Delphi-Quellcode:

function GetSystemFont: TFont;
var SysFont: TFontM
begin
  with SysFont do begin
    create;
    size := 10;
    color := clWindowText;
    style := [];
    name := {?! System-Font !?} ;
  end;
  result := f
  SysFont.Free;
end;

[Bernhard Geyer]

Schau dir mal die Win32API-Funktion SystemParametersInfo an.
Es gibt ja nicht nur den Font (z.B. für Buttons) sondern je nach Einsatz unterschiedliche.

[TimonWorld]

menno die win-api ist englisch, aber werde trotzdem mal nachblättern.