Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Потрепаться";
Текущий архив: 2002.11.25;
Скачать: [xml.tar.bz2];

Вниз

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

 
Василий   (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
и послать указанное в хелпе бродкастное сообщение


 
AL2002   (2002-11-06 18:17) [3]


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

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



Страницы: 1 вся ветка

Форум: "Потрепаться";
Текущий архив: 2002.11.25;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.008 c
14-82969
Junior
2002-11-05 01:02
2002.11.25
Прошел все Half-Life-ы...


1-82691
TTCustomDelphiMaster
2002-11-13 16:57
2002.11.25
ActiveX.2


1-82830
Misha
2002-11-11 12:30
2002.11.25
Проблема с указателями на указатели


3-82624
OlegKrt
2002-11-05 15:49
2002.11.25
Реструктуризация таблицы Paradox программно


7-83033
antonioxxx
2002-09-22 22:40
2002.11.25
Ошибка при работе с GetWindowsDirectory





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский