На этом шаге мы рассмотрим компонент TWordFont.

Компонент TWordFont - это специальный сервер, позволяющий работать со шрифтами в документе. Имеет свойства, аналогичные свойствам TWordDocument.

Подключение этого сервера к соответствующему объекту удобнее осуществлять с помощью метода ConnectТо. Как аргумент метода указывается объект, с которым связывается компонент. Например, оператор:

WordFont1 .ConnectTo(WordApplication1.Selection.Font);

подключают компонент WordFont1 к шрифту выделенного текста. После этого свойства и методы соответствующего объекта можно вызывать через данный компонент.

Объект Font имеет следующие свойства:

Name - имя шрифта;
Bold - жирный;
Italic - курсив;
Size - размер шрифта;
StrikeThrough - перечеркнутый;
DoubleStrikeThrough - перечеркнутый двойной линией;
Underline - подчеркнутый;
Shadow - с тенью;
Emboss - приподнятый;
Engrave - утопленный;
Hidden - невидимый;
Subscript - нижний индекс;
Superscript - верхний индекс;
Ouline - символ отображается в виде контура;
Spacing - расстояние между символами;
SmallCaps - малые прописные буквы;
ColorIndex - индекс цвета из цветовой политры.

Например, операторы:

WordFont.Underline :=1;
WordFont.Bold:=1;

обеспечивают в выделенном тексте (если WordFont связан с выделением) жирный подчеркнутый шрифт.

Проиллюстрируем данные свойства на примере. Создадим приложение. На форму поместим 2 кнопки TButton, компоненты TWordApplication и TWordFont и компонент TRadioGroup. Результат приложения можно увидеть на рисунке.

Рис.1. Иллюстрация свойств объекта Font

Попробуйте этот пример сделать сами. Если не получится, то текст этого приложения можно взять здесь

На следующем шаге мы рассмотрим компонент TWordParagraphFormat.

Предыдущий шаг Содержание Следующий шаг