Изучим этот класс. Шрифт (класс TFont) относится к холсту (Canvas). Основные характеристики у шрифта следующие: Style (стиль, позволяет задать такие характеристики шрифта как полужирность (fsBold), наклон (fsItalic), подчеркнутость (fsUnterline) и перечеркнутость (fsStrikeOut)), Height (высота в пикселях), Size (высота в пунктах (как в Word)), Color (цвет), Name (имя шрифта).
Вот пример использования этих свойств:
Form1.Canvas.Font.Style:=[fsItalic, fsBold];
Form1.Canvas.Font.Size:=20;
Form1.Canvas.Font.Name:='Arial';
Form1.Canvas.TextOut(10, 10, 'Пример');
Обратите внимание, как мы используем свойство Style. Оно имеет тип TFontStyles, которое в свою очередь является множеством (set) значений типа TFontStyle. Поэтому при присваивании мы перечисляем необходимые значения в квадратных скобках: Form1.Canvas.Font.Style:=[fsItalic, fsBold];
Если в вашей программе предусмотрена возможность установки шрифта пользователем, то проще всего воспользоваться предусмотренным для этого стандартным диалогом.
Всё на этом урок закончен.