Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Install Font
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire de rapports & Rapports
Titre:
Divers
Thread ID:
00394150
Message ID:
00394192
Vues:
11
Hi Charles,
Here you are some code I downloaded from here (not mine, sorry I don't remember who wrote this code). You can register the specific font from within your application:

**************Register Font
DECLARE INTEGER AddFontResource IN GDI32.DLL ;
STRING @ lpszFileName
DECLARE INTEGER SendMessage IN USER32.DLL ;
INTEGER hWnd, ;
INTEGER Msg, ;
INTEGER wParameter, ;
INTEGER lParameter
#DEFINE HWND_BROADCAST 0xFFFF
#DEFINE WM_FONTCHANGE 0x001D
LOCAL nNumFontsAdded
cMyFontFilePath = 'C:\FONTS\MyFONT.TTF' && or whatever
nNumFontsAdded=AddFontResource(cMyFontFilePath)
IF nNumFontsAdded > 0
* We added fonts, so update the world
=SendMessage(HWND_BROADCAST,WM_FONTCHANGE,0,0)
* notifies WinApps about change font table
ELSE
* Unable to add font; maybe not a supported format
ENDIF
**************************************************


HTH

Boris
Against Stupidity the Gods themselves Contend in Vain - Johann Christoph Friedrich von Schiller
The only thing normal about database guys is their tables.
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform