Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Install Font
Message
General information
Forum:
Visual FoxPro
Category:
Reports & Report designer
Title:
Miscellaneous
Thread ID:
00394150
Message ID:
00394192
Views:
12
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.
Previous
Reply
Map
View

Click here to load this message in the networking platform