-
Всем привет.
TTF прочитан из некоего контейнера в array of byte; имя файла неизвестно, имя шрифта тоже. хочу, к примеру, чтобы TLabel вывел свой Caption этим шрифтом.
сделать это можно таким образом:
var hf,hff: hfont; lf: TLogFont;
hf := AddFontMemResourceEx(ttf,length(ttf),nil,@fontcnt); if hf = 0 then exit; FillChar(lf,sizeof(lf),0); lf.lfFaceName := 'Overexposed'; // *** hff := CreateFontIndirect(lf); LabelTTF.Font.Handle := hff;
*** - вот это имя как узнать, имея только hf ?
Спасибо
-
Описание формата ttf уже удалили отовсюду?
-
да, я так и сделал. лень было парсить
|