Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Замена меток в Word 
:(
    Опции темы
SkyHawk
Дата 27.6.2007, 04:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 164
Регистрация: 17.8.2006
Где: г. Новосибирск

Репутация: 1
Всего: 2



Народ, подскажите!
Надо заменить текст в вордовском документе. Возникает два вопроса. Первый: как сделать, чтобы замена выполнилась по всем меткам в документе, а не только по одной? 
Второй: как отменить запрос о сохранении документа? Функция  WordApplication1->set_DisplayAlerts(wdAlertsNone) не помогает.

Код


void __fastcall TForm1::FormCreate(TObject *Sender)
{
  OleVariant FileName=GetCurrentDir()+"\\1.doc";
  OleVariant Yes=true;

  // открываем нужный документ
  WordApplication1->Documents->Add(FileName, EmptyParam);
  // меняем везде значение 111

  OleVariant oldStr = AnsiString("111");
  OleVariant newStr = AnsiString("пробный");

  WordDocument1->ConnectTo(WordApplication1->ActiveDocument);
  WordDocument1->Range(EmptyParam,EmptyParam)->Find->Execute(oldStr,
    EmptyParam,EmptyParam,EmptyParam,EmptyParam,
    EmptyParam,EmptyParam,EmptyParam,EmptyParam,
    newStr,Yes);
  WordApplication1->set_DisplayAlerts(wdAlertsNone);
  WordApplication1->set_Visible(true);
}




Версия Билдера - 6.0

Это сообщение отредактировал(а) SkyHawk - 27.6.2007, 04:04
--------------------
Быть может все, что может быть, И даже то, что быть не может.
PM MAIL WWW   Вверх
SkyHawk
Дата 29.6.2007, 04:18 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 164
Регистрация: 17.8.2006
Где: г. Новосибирск

Репутация: 1
Всего: 2



М-да... 
Спасибо за активную помощь.
Ладно, с первым вопросом сам разобрался. Помогите хотя-бы со вторым.
--------------------
Быть может все, что может быть, И даже то, что быть не может.
PM MAIL WWW   Вверх
SkyHawk
Дата 2.7.2007, 03:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 164
Регистрация: 17.8.2006
Где: г. Новосибирск

Репутация: 1
Всего: 2



Товарищи, ну что же вы так?...
Ну помогите же. Неужели никто и никогда не работал с Word? 
У меня появился еще вопрос. Как сделать, чтобы компонент мог отключиться от сервера Word и создать/открыть новые документы при том, чтобы старые доки были не закрыты?

Это сообщение отредактировал(а) SkyHawk - 2.7.2007, 03:59
--------------------
Быть может все, что может быть, И даже то, что быть не может.
PM MAIL WWW   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "С++ Builder"
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по С++ Builder обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Настоятельно рекомендуем заглянуть в DRKB (Delphi Russian Knowledge Base) - крупнейший в рунете сборник материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | C++ Builder | Следующая тема »


 




[ Время генерации скрипта: 0.0390 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.