Firemonkey не видит динамически загружаемый шрифт в Windows

Когда я загрузил динамический шрифт в Windows с помощью

AddFontResource("myfontpath.ttf");

Мне нужно выбрать его на холсте и нарисовать с ним текст:

Canvas.Font.Family := "myfontname"

На OS X и iOS работает нормально! - потому что загрузка пользовательского шрифта выполняется через .plist вне приложения. Однако в Windows он не распознает шрифт и возвращается к стандартному шрифту.

Я нашел эти темы, указывающие на то, что это общая проблема с FMX. Firemonkey: добавление шрифта из ресурса в память и используя его и Установите шрифт в firemonkey

Эти вопросы НЕ заканчиваются решением, хотя один из них предлагает работать со стилями, но в моей ситуации я использую шрифт в пользовательском компоненте без стилей (унаследованном от TControl, а не от TStyledControl)

Кто-нибудь нашел решение или обходной путь?

PS. Установка шрифта программой установки в Windows невозможна, поскольку шрифт должен быть скрыт для других приложений. Это не текстовый шрифт! Для этого я использую AddFontResourceEx( ... ,FR_PRIVATE, ... ), но проблема с FMX, которую я описываю, аналогична AddFontResource.


person Hans    schedule 17.09.2014    source источник
comment
В других темах ответа на этот вопрос нет.   -  person Hans    schedule 17.09.2014
comment
Дублирование означает, что вопросы одинаковые. Тот факт, что ни один из других ответов не решает вашу проблему, не имеет значения. Извиняюсь.   -  person David Heffernan    schedule 17.09.2014
comment
Итак, как я могу спросить, нашел ли кто-нибудь ответ? - потому что у меня недостаточно баллов, чтобы комментировать другие вопросы.   -  person Hans    schedule 17.09.2014
comment
Я дал вам достаточно репутации, чтобы иметь возможность комментировать   -  person David Heffernan    schedule 17.09.2014