Schriftart aus Datei laden

[Balu der Bär]

Moin Jens,

Delphi-Quellcode:

// Füge Font hinzu  
AddFontResource(PChar('datei.ttf'));  
SendMessage(HWND_BROADCAST,WM_FONTCHANGE,0,0);  

// Zum Löschen  
RemoveFontResource(PChar('datei.ttf'));  
SendMessage(HWND_BROADCAST,WM_FONTCHANGE,0,0);