Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.015 c