Hi,
How can I use in my program my own font - it means non system font ?
Hello paja, call AddFontResourceEx api (LoadFont like function) to attach your font file to current process:
$include "windowssdk.inc"
int fontscount = AddFontResourceEx("c:\\download\\my font.fon", FR_PRIVATE, 0)
...SetFont()...
If the function succeeds, the return value specifies the number of fonts added, or zero if failed.
FR_PRIVATE - Specifies that only the process that called the AddFontResourceEx function can use this font. When you are finished with this font, call RemoveFontResourceEx with the same parameters.
I wrote
const FR_PRIVATE = 0x10
def fontscount:int
declare "gdi32.dll", AddFontResourceEx(LPCSTR:string, fl:Double, PVOID:int),int
fontscount = AddFontResourceEx("D:\E_basic\EBDev\lcddot.ttf", FR_PRIVATE, 0)
but I get this error from linker: "Unresolved_external: ___inp_AddFontResourceEx"
Are you running win2k pro or higher?
I have WIN XP PRO
AddFontResourceEx is an alias for AddFontResourceExA or AddFontResourceExW (unicode version).
OK - but how can I uset it ? Please can you write complete code.
$include "windowssdk.inc"
Larry
What you originally posted should work if you change AddFontResourceEx to AddFontResourceExA (for ANSI) or AddFontResourceExW (for UNICODE).