EnableExplicit Procedure InstallAdditionalFonts(font$) AddFontResource_(font$) SendMessage_(#HWND_BROADCAST,#WM_FONTCHANGE,0,0) EndProcedure Procedure DeinstallAdditionalFonts(Font$) RemoveFontResource_(font$) SendMessage_(#HWND_BROADCAST,#WM_FONTCHANGE,0,0) EndProcedure InstallAdditionalFonts("Deine_Schriftart.ttf")