Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Проблема с ОЛЕ, Вордом [D7, WinXP]


Delphi5.01 ©   (2003-10-12 22:14:00) 

Доброе врема суток!
Имю приблизительно вот такой код:

Text := "Delphi";
Label := "1234";
WordDocument1.Range.Find.Execute(Label,EmptyParam,EmptyParam,EmptyParam,
EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, Text,
replace);

Как понятно из листинга етот код используется для Replace-а в ворде, но проблема в

том что я хочу сменить все 1234 на Дельфиб только в том случае если шрифт 1234

Times New Roman. Весь текс 1234 должен быть набран в одном шрифте (Таимс нью рома)

Прежде временно спасибо за помощ


Delphi5.01   (2003-10-13 06:33:00) [1]

da ia prosto smenil razdel, vozmojno v "osnovnoi" emu ne mesto, eto polshe sistemni vopros.


Ломброзо   (2003-10-12 23:23:00) [2]

А почему Вы переспрашиВАете?


Наверх

Титульная страница Поиск, карта сайта Написать письмо