задать font delphi

else WFont.StrikeThrough:=False; //Незачеркнутый

if fsStrikeOut in font.Style then WFont.StrikeThrough:=True //Зачеркнутый

WFont.Size:=font.Size; //Размер

else WFont.Italic:=False; //Прямой

if fsItalic in font.Style then WFont.Italic:=True //Курсив

else WFont.Bold:=False; //Светлый

if fsBold in font.Style then WFont.Bold:=True //Полужирный

function FontToWFont(font:TFont;WFont:variant):boolean;

назначению свойства этих двух объектов имеют разные типы, нам придется использовать следующую специальную процедуру.

параметры объекта TFont Delphi в параметры объекта Font Word. Поскольку аналогичные по

Мы будем задавать шрифт из программ, разработанных в Delphi, поэтому нам нужно будет преобразовать

Рис.2. Диалог выбора шрифта в Delphi

Рис.1. Диалог выбора шрифта в Word

Сравним диалоги выбора и настройки шрифта в Word (рис. 1) и Delphi (рис. 2).

значений. В Word шрифт имеет больше дополнительных визуальных параметров, чем шрифт в Delphi.

цвет шрифта как сочетание красного, зеленого и синего, а в Word цвет выбирается из палитры возможных

и методам объекта TFont в Delphi. Отличия заключаются в следующем: в Delphi можно задать

Шрифт в Word представляет собой объект, имеющий свойства и методы, часть которых аналогична свойствам

На этом шаге мы рассмотрим способ задания шрифта текста в таблице.

Автоматизация Microsoft Word. Создание таблиц и работа с ними. Задание шрифта текста в таблице