Как шрифт установить?...

← →
ronyn (2005-08-27 01:51) [0]

...на комп юзера при инсталляции моей программы, к-рая использует нестандартные шрифты? И во всех ли операционках Виндов шрифты располагаются в windows\font?

← →
имя (2005-08-27 02:08) [1]

Удалено модератором

← →
Джо © (2005-08-27 04:02) [2]

1. AddFontResource или AddFontResourceEx.
2. Нет.

← →
ronyn (2005-08-31 00:56) [3]

Какие параметры нужно передать функции AddFontResourceEx?
Её описания нигде нет.

← →
Джо © (2005-08-31 01:02) [4]

> [3] ronyn (31.08.05 00:56)
> Её описания нигде нет.

Неправда. Ее описание есть по крайней мере в двух источниках
1. Windows SDK (поставляется вместе с Делфи, меню Help/Windows SDK).
2. MSDN.

← →
Desdechado © (2005-08-31 13:43) [5]

шрифт не обязательно устанавливать на постоянно
его можно регистрировать на время выполнения программы из любого места

> [5] Desdechado © (31.08.05 13:43)
> его можно регистрировать на время выполнения программы из
> любого места

Функция AddFontResourceEx это позволяет.

← →
Экспериментатор (2005-08-31 18:36) [7]

В OnCreate главной формы
AddFontResource(PChar(font_PathName));
SendMessage(HWND_BROADCAST, WM_FONTCHANGE, 0, 0);

В OnClose
RemoveFontResource(PChar(Font_PathName));
SendMessage(HWND_BROADCAST, WM_FONTCHANGE, 0, 0);

Прошу учесть: имя файла и наименование шрифта это разные вещи.
А файл фонта проще хранить в каталоге с программой.

← →
Экспериментатор (2005-08-31 18:40) [8]

Типа

var
Font_PathName : AnsiString;
begin
Font_PathName:=ExtractFilePath(ParamStr(0))+"PHONTM.TTF";

Работает без проблеммов

Как шрифт установить?... Найти похожие ветки