Шрифт по-умолчанию. Есть ли такая возможность?

[tria]

У контролов на форме имя шрифта - default.
Есть ли какая-то переменная или свойство, общее для всего приложения, которое позволяет задать, какой же шрифт по-умолчанию должен быть у контролов?

[VirtUX]

+1
P.S. Если в конструкторе использовать Font.Height, то он всегда равен нулю, пока его не установишь явно в некоторое значение. НО! Ведь Caption, Text, Value etc. рисуется на компоненте не с нулевым значением. Где это значение устанавливается? Где взять параметры этого default шрифта?

Добавлено спустя 3 часа 27 минут 21 секунду:
Порывшись в исходниках - пришел к выводу, что таких параметров не существует (на ближайших уровнях наследственности). Зато, как вариант, можно пользоваться некоторыми другими свойтвами. Так для получения реального Font.Height можно использовать функцию Font.TextHeight(Caption).
Вобщем пока решение найдено. Но хотелось бы все же иметь возможность этот default обозначить каким-то конкретным шрифтом.

[Brainenjii]

а разве default - это не системный шрифт?

[VirtUX]

а разве default - это не системный шрифт?

Если он системный, то где взять его высоту?

[Brainenjii]

Опять же, системная

[VirtUX]

Опять же, системная

А имя у системной константы есть? Я в модуле System ничего не нашел, хотя может плохо искал...