Hola:
Puedes utilizar la función del API de Windows AddFontResource, donde le indicas la ruta donde está el archivo de extensión *.FON, *.FNT, *.TTF ó *.FOT:
AddFontResource (PChar('c:\Programa\arialhelvetic.ttf'));
Si quieres notificar a todas las aplicaciones que hay una nueva fuente:
SendMessge (HWND_BROADCAST, WM_FONTCHANGE, 0, 0);
Para quitarla:
RemoveFontResource (PChar('c:\Programa\arialhelvetic.ttf'));
SendMessge (HWND_BROADCAST, WM_FONTCHANGE, 0, 0);
Un saludo
|