Чертовщина с закладками в MS Word / Delphi

ReSQL.ru

Мобильная версия Контакт Правила FAQ Помощь

Гость

Войти | Регистрация | Профиль | Очистить

Новые сообщения | Избранное

Форумы | Пользователи | Статистика | Мод. лог | Поиск

Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр

Форумы / Delphi [игнор отключен] [закрыт для гостей] / Чертовщина с закладками в MS Word

2 сообщений из 2, страница 1 из 1

Чертовщина с закладками в MS Word

#40106187

Страдалецъ

Участник

Откуда: Мурманск

Сообщения: 1 492

Рейтинг: 0 / 0

Имеется документ MS Word в котором есть 3 закладки (Фамилия1,Фамилия2,Фамилия3). VBA эти закладки видит и дает их имена нормально, а вот в Delphi творится хрень. Количество закладок я получаю верно, имя первой закладки тоже выдает правильно, а дальше по индексу 2 я вдруг получаю третью закладку, а по индексу 3 закладку вообще не получить - нет ее в коллекции. Код работы с закладками такой:

Код: pascal

1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.

Templates := TStringList.Create;
 Templates.Values['Фамилия'] := 'Иванов';

 for i := 1 to wdDoc.Bookmarks.Count do
 begin
  for j := 0 to Templates.Count-1 do
  begin
   Key := Templates.KeyNames[j];
   BM := wdDoc.Bookmarks.Item(i).Name;
   if Copy(BM, 1, Length(Key)) = Key then
    wdDoc.Bookmarks.Item(i).Range.Text := Templates.ValueFromIndex[j];
  end;
 end;

Где я не вижу слона?

...

Рейтинг:

0 / 0

22.10.2021, 16:44

| Ответить | Цитировать | Написать

Чертовщина с закладками в MS Word

#40106196

Страдалецъ

Участник

Откуда: Мурманск

Сообщения: 1 492

Рейтинг: 0 / 0

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

...

Рейтинг:

0 / 0

22.10.2021, 17:37

| Ответить | Цитировать | Написать

2 сообщений из 2, страница 1 из 1

Форумы / Delphi [игнор отключен] [закрыт для гостей] / Чертовщина с закладками в MS Word

Цитировать

Написать

Автор*:

Ввести пароль для входа

Тема*:

Сообщение

Данное сообщение тематическое

Сообщение содержит картинки или видео 18+

Автор:

ВНИМАНИЕ! На данном подфоруме действуют строгие правила. Удостоверьтесь, что ваше сообщение соответствует им!

Форум или тема закрыты для гостей. Необходима авторизация!

Загрузить последнюю сохраненную версию

Вложение:

Вставить как галерею

Максимальный размер вложений: 4,0 МБ, аудио/видео: 8,0 МБ. Картинки большего размера ужимаются, если возможно.

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

Отправляя сообщение, я выражаю свое согласие с правилами форума и принимаю пользовательское соглашение.

Читали тему (0):

Читали форум (0):

Пользователи онлайн (0):

start [/forum/topic.php?fid=58&msg=40106187&tid=2036936]:	0ms
get settings:	11ms
get forum list:	14ms
check forum access:	3ms
check topic access:	3ms
track hit:	40ms
get topic data:	14ms
get forum data:	3ms
get page messages:	53ms
get tp. blocked users:	2ms
others:	262ms

total:	405ms