Текущий архив: 2004.01.16;
Скачать: CL | DM;
Вниз
Получение размера системного шрифта Найти похожие ветки
← →
Неля (2003-11-11 16:38) [0]Здравствуйте!
При разных разрешениях и масштабах шрифтов у моего приложения надписи выглядят слишком мелко или слишком крупно. В итоге встает вопрос: как получить размер системного шрифта?
← →
Игорь Шевченко © (2003-11-11 16:40) [1]Screen.PixelsPerInch
← →
Неля (2003-11-11 16:58) [2]Ок, спасибо, вроде похоже на системный шрифт...
← →
Неля (2003-11-11 17:00) [3]Кстати, тогда еще встречный вопрос: у меня в системе по умолчанию стоит шрифт tahomа, а на форме MS Sans Serif, можно ли как-то сделать определние имени системного шрифта?
← →
Игорь Шевченко © (2003-11-11 17:45) [4]Неля (11.11.03 17:00)
Либо смотреть дальше в TScreen (там много чего есть),
либо SystemParametersInfo (SPI_GETNONCLIENTMETRICS, ...)
← →
Неля (2003-11-11 17:58) [5]Я так вот и делала:
NonClientMetrics: TNonClientMetrics;
begin
Result:=0;
NonClientMetrics.cbSize := sizeof(NonClientMetrics);
if SystemParametersInfo(SPI_GETNONCLIENTMETRICS, 0, @NonClientMetrics, 0) then
Result:= CreateFontIndirect (NonClientMetrics.lfMessageFont);
Но потом смотрю, а шрифт-то больше (немного правда), чем надо. Чуть-чуть, но больше...
Что делать?
← →
Игорь Шевченко © (2003-11-12 00:25) [6]Неля (11.11.03 17:58)
lfCaptionFont использовать, например
← →
Неля (2003-11-12 00:49) [7]Хорошо, попробую
Страницы: 1 вся ветка
Текущий архив: 2004.01.16;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.017 c
