Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 18.03.2011, 16:32
Аватар для Totoro
Totoro Totoro вне форума
Прохожий
 
Регистрация: 18.03.2011
Сообщения: 4
Репутация: 10
По умолчанию Delphi и Word. Как удалить найденный текст?

Здравствуйте уважаемые!
Проблема в следующем:
Есть программка, которая ищет в тексте документа Ворд метки вида [1], [2] и т. д. и вместо них ставит значения из таблицы Иксель, из первого столбики, из второго, и т. д.

Процедура замены выглядит вот так:
Код:
1
2
3
4
5
6
7
8
9
function FindAndInsert (FindText,ReplacementText:string):boolean;
    label 1;
begin
WB.StartOfDocument;
1: WB.EditFind(FindText); 
  if WB.EditFindFound then begin WB.insert(ReplacementText);
  goto 1;
  end;
end;
Админ: Пользуемся тегами!

Теперь сам вопрос, можно ли сделать так, чтобы программа не заменяла метку на текст из Иксель, а удаляла ее? Это нужно для обработки пустых ячеек Иксель. Раньше у меня в случае пустой ячейки программа ставила пробел вместо метки, но в очередной версии документа это уже не допускается.

Последний раз редактировалось Admin, 18.03.2011 в 16:37.
Ответить с цитированием
  #2  
Старый 18.03.2011, 16:38
Assistant Assistant вне форума
Продвинутый
 
Регистрация: 20.02.2011
Адрес: там где правят идиоты
Сообщения: 603
Версия Delphi: 7
Репутация: выкл
По умолчанию

а так не работает?
Код:
1
WB.delete(ReplacementText)
__________________
взялся из неоткуда, ничего не прошу, помогаю просто так
ICQ: 593977748 - стучать в случае КРАЙНЕЙ необходимости, ну, или если вы со Ставрополя
Ответить с цитированием
  #3  
Старый 18.03.2011, 16:43
Аватар для Totoro
Totoro Totoro вне форума
Прохожий
 
Регистрация: 18.03.2011
Сообщения: 4
Репутация: 10
По умолчанию

Не хочет, выдает ошибку Metod 'Delete' not supported by automation object
(ошибка при выполнении программы, компилируется нормально)
Ответить с цитированием
  #4  
Старый 18.03.2011, 16:54
Assistant Assistant вне форума
Продвинутый
 
Регистрация: 20.02.2011
Адрес: там где правят идиоты
Сообщения: 603
Версия Delphi: 7
Репутация: выкл
По умолчанию

а так:
Код:
1
WB.insert('')
__________________
взялся из неоткуда, ничего не прошу, помогаю просто так
ICQ: 593977748 - стучать в случае КРАЙНЕЙ необходимости, ну, или если вы со Ставрополя
Ответить с цитированием
  #5  
Старый 18.03.2011, 17:06
Аватар для Totoro
Totoro Totoro вне форума
Прохожий
 
Регистрация: 18.03.2011
Сообщения: 4
Репутация: 10
По умолчанию

Так уже пытался, при этом никакой замены не происходит, метка остается на своем месте.

P.S. Потому раньше и расставлял пробелы.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 05:36.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025