Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как получить системный шрифт Windows? [D7, Win95/98, WinXP]


Tack ©   (2005-01-22 13:36:00) 

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

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


Tack83   (2005-01-23 12:38:00) [1]

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

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

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

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


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

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

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


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

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо