Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Шрифты [D5, Win95/98]


Анатолий ©   (2002-05-06 13:33:00) 

Пожалуйста! Посоветуйте как лучше прикрепить нестандартные шрифты к проекту. Как мне кажется существует по крайней мере один способ это закинуть шрифтовые файлы в папку Font при инсталяции написанного приложения. Может кто знает другие способы, чтобы прикрепить шрифт к приложению. Заранее спасибо.


Anatoly Podgoretsky   (2002-05-06 14:07:00) [1]

Если найдешь portfont то будешь чрезмерно счаствлив


Nikolay M.   (2002-05-06 13:59:00) [2]

1) у меня были шрифты в виде .ttf, я их просто тупо прописывал в папку типа \Windows\Fonts и это даже работало
2) более правильно, наверное, регистрировать их с помощью AddFontResource и удалять RemoveFontResource. Регистрировать примерно вот так:

begin
{$IFDEF WIN32}
AddFontResource (PChar("c:\MyFonts\Font.ttf"));
{$ELSE}
var
s : array [ 0..255 ] of Char;
AddFontResource (StrPCopy (s, "c:\MyFonts\Font.ttf"));
{$ENDIF}
SendMessage (HWND_BROADCAST, WM_FONTCHANGE, 0, 0);
end;

удалять - аналогично. Шрифты могут быть в виде .fon, .fnt, .ttf или .fot файлов.


Windeus   (2002-05-06 13:41:00) [3]

Знаю что можно в файл ресурсов шрифты крепить, но до сих пор не знаю как. Пожалуйста скажите как их туда прикрепить?


Song   (2002-05-06 13:41:00) [4]

Для этого достаточно иметь соответсвующий TTF файл. Не обязательно в папке Fonts.


Наверх

Титульная страница Поиск, карта сайта Написать письмо