Кто ни будь знает как программно инсталлировать шрифт ?

← →
Василий © (2002-11-06 17:59) [0]

subj

← →
sniknik © (2002-11-06 18:01) [1]

FAQ знает :))

Добавить фонт (.fon, .fot, .fnt, .ttf) в систему можно след. образом:

{$IFDEF WIN32} AddFontResource( PChar( my_font_PathName { AnsiString } ) ); {$ELSE} var ss : array [ 0..255 ] of Char; AddFontResource ( StrPCopy ( ss, my_font_PathName )); {$ENDIF} SendMessage ( HWND_BROADCAST, WM_FONTCHANGE, 0, 0 );

Убрать его по окончании работы:

{$IFDEF WIN32} RemoveFontResource ( PChar(my_font_PathName) ); {$ELSE} RemoveFontResource ( StrPCopy ( ss, my_font_PathName )); {$ENDIF} SendMessage ( HWND_BROADCAST, WM_FONTCHANGE, 0, 0 );

Где my_font_PathName - полный путь к файлу со шрифтом.

← →
MBo © (2002-11-06 18:01) [2]

AddFontResource
и послать указанное в хелпе бродкастное сообщение

> MBo © (06.11.02 18:01)
> AddFontResource
> и послать указанное в хелпе бродкастное сообщение

После упражнений (многодневных) заметил, что шрифт всё равно доступен приложениям даже без бродкаста. Просто они иногда добавленный шрифт не показывают в своём списке шрифтов. Иногда показывают.
Если после аддфонтресурс запустить приложение (ворд, например), то он точно покажет новый шрифт.
Хреновато, что низя, чтобы добавленый программно шрифт можно было использовать только в одной проге.

Кто ни будь знает как программно инсталлировать шрифт ? Найти похожие ветки