Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.04.11;
Скачать: CL | DM;

Вниз

Форматирование текста в MSWord   Найти похожие ветки 

 
Bers01   (2004-03-23 15:12) [0]

Уважаемые МАСТЕРА!
Подскажите:
Как программно форматировать текст в MSWord
(размер шрифта, курсив, подчеркивание, жирный шрифт...)
Для доступа к Word-у пользую компонент TWordApplication
Запись текста строкой:
WordApplication1.Selection.Tables.Item(1).Cell(row,5).Range.Text:="новый текст"

Как сделать выводимую строку, например, подчеркнутой.
С Уважением, Андрей.


 
Yermek   (2004-03-23 15:16) [1]

WordApplication1.Selection.Range(1,11).Bolt; для первый 11 символов, кстати символ коретки так же идут в счет и т.д. и т.п.
если WordApplication1.Selection.Range.Bolt;
то весь твой документ будет жирным


 
TUser ©   (2004-03-23 15:24) [2]

Лучше всего переписать соотв. текст из макроса в VBA.


 
Bers01   (2004-03-23 15:32) [3]


> Yermek   (23.03.04 15:16) [1]
> WordApplication1.Selection.Range(1,11).Bolt; для первый
> 11 символов, кстати символ коретки так же идут в счет и
> т.д. и т.п.
> если WordApplication1.Selection.Range.Bolt;
> то весь твой документ будет жирным


Спасибо за подсказку, но есть поправочка:
Вариант
WordApplication1.Selection.Tables.Item(1).Cell(row,5).Range.Bold;
не работает.
Работает такой:
WordApplication1.Selection.Tables.Item(1).Cell(row,5).Range.Bold:=1;

С Уважением, Андрей.



Страницы: 1 вся ветка

Текущий архив: 2004.04.11;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.039 c
1-1080117303
Gia Gvatua
2004-03-24 11:35
2004.04.11
About TListView


8-1071577967
Виталий
2003-12-16 15:32
2004.04.11
OpenGL


1-1082622131
Alexey
2004-04-22 12:22
2004.04.11
Как перегнать стринг из виндосовского формата в досовски


4-1079373919
Константин
2004-03-15 21:05
2004.04.11
Замена названия окна программы


14-1079289669
Asteroid
2004-03-14 21:41
2004.04.11
Такое не бывает!