Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.06.19;
Скачать: CL | DM;

Вниз

Использование своего шрифта   Найти похожие ветки 

 
Keymaster ©   (2003-04-21 14:23) [0]

Как подключить свой шрифт понятно (нашёл в FAQ),
а как его после этого использовать?
Т.к. при попытке установить font.name при работе
вместо него используется courier


 
MBo ©   (2003-04-21 14:33) [1]

addfontresource+WM_FONTCHANGE


 
Keymaster ©   (2003-04-21 14:49) [2]

не работает.


 
MBo ©   (2003-04-21 14:53) [3]

все работает. Проанализируй ошибки Addfontresource.
Код покажи.


 
Keymaster ©   (2003-04-21 15:25) [4]

AddFontResource( PChar("c:\geeksfnt.ttf" ) );
SendMessage ( HWND_BROADCAST, WM_FONTCHANGE, 0, 0 );
Label1.Font.Name := "geeksfnt";


 
MBo ©   (2003-04-21 15:31) [5]

кусок из раб. программы
может, у тебя имя файла отличается от имени шрифта?

AddFontResource(PChar("myfont.ttf"));
SendMessage(HWND_BROADCAST,WM_FONTCHANGE,0,0);
...
label1.font.name:="myfont";


 
Игорь Шевченко ©   (2003-04-21 15:36) [6]


> SendMessage(HWND_BROADCAST,WM_FONTCHANGE,0,0);


PostMessage(HWND_BROADCAST,WM_FONTCHANGE,0,0);


 
Keymaster ©   (2003-04-21 15:43) [7]

имя файла с именем шрифта совпадают...


 
Keymaster ©   (2003-04-21 15:45) [8]

procedure TSettingsForm.ButtonApply(Sender: TObject);
begin
AddFontResource( PChar("c:\geeksfnt.ttf" ) );
// SendMessage ( HWND_BROADCAST, WM_FONTCHANGE, 0, 0 );
PostMessage ( HWND_BROADCAST, WM_FONTCHANGE, 0, 0 );
Label1.Font.Name := "geeksfnt";
end;


 
Игорь Шевченко ©   (2003-04-21 16:05) [9]

int AddFontResource(

LPCTSTR lpszFilename // pointer to font-resource filename
);

Return Values

If the function succeeds, the return value specifies the number of fonts added.
If the function fails, the return value is zero. To get extended error information, call GetLastError.

Я к тому, что результат функции надо проанализировать...


 
Keymaster ©   (2003-04-21 16:22) [10]

AddFontResource( PChar("c:\geeksfnt.ttf" ) )
возвращает "1"



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

Текущий архив: 2003.06.19;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.015 c
3-60054
Term
2003-05-28 10:21
2003.06.19
Переиндексация


14-60352
TRh
2003-05-28 15:42
2003.06.19
Восстанавливаем исходники


7-60437
ddenisv
2003-04-12 15:04
2003.06.19
Как обратится к первому мегабайту памяти?


8-60268
NeoClub's Lider
2003-03-04 23:40
2003.06.19
Звук в Дельфине 5.0


1-60236
killer
2003-06-05 15:33
2003.06.19
Можно ли сделать в Windows98 так, чтобы все было как в XP