Schriftfont nur in die eigene Anwendung zu laden?

[Balu der Bär]

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