Вниз
Скачать: CL | DM;

Как получить системный шрифт Windows?   Найти похожие ветки 

 
Tack   (2005-01-22 13:36) [0]

Почему-то установленное в True свойство TForm.ParentFont для моего диалогового окна работает не на всех компьютерах.
Т.е. иногда шрифт в диалоге соответствует системному, а иногда нет.
Хочу вручную устанавливать свойство TForm.Font при каждом запуске приложения.

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


 
Tack   (2005-01-23 00:51) [1]

Помогите!!!!!


 
Cobalt ©   (2005-01-23 02:53) [2]

http://asysoev.nm.ru/ForForums/Delphi2005_is_Bugs_Bag.htm
Смотри баг №6 - может, это натолкнет тебя на решение.

P.S. Что значит "Системный шрифт"? Ты имеешь в виду настройки "Свойства: Экран"-> "Оформление"?


 
Tack83 ©   (2005-01-23 12:38) [3]

Ну, я предполагаю, системный шрифт - это тот шрифт, который используется в стандартных диалогах Windows (типа "Форматирование дискеты") в сообщениях, контролах, статическом тексте и т.д.

Я пока поставил так:
Form1.Font := Screen.IconFont;

Т.е. принял по умолчанию шрифт с рабочего стола. Может, это и есть решение? Пока проверил на WinXP и Win98 - работает.

Но все равно хотелось бы как-нибудь получать LOGFONT для шрифта, который стоит для системных диалогов по умолчанию. Сколько ни смотрел API - не нашел такого. :-(



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

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



Память: 0.45 MB
Время: 0.023 c
6-1102991145
Timur
2004-12-14 05:25
2005.03.06
Счетчик трафика


1-1108815635
TUser
2005-02-19 15:20
2005.03.06
Быстрая сортировка


1-1107949114
Aleksandr.
2005-02-09 14:38
2005.03.06
Как правильно массив байт привести к integer?


14-1108408065
Torry
2005-02-14 22:07
2005.03.06
"Петров-Водкинъ"


1-1108996059
XP
2005-02-21 17:27
2005.03.06
Возможно ли "зависание" в этом коде из VCL? (критические секции)




   Наверх