Текущий архив: 2003.11.13;
Скачать: CL | DM;
Вниз
Не все закладки удаляются с помощью TWordApplication Найти похожие ветки
← →
Донской © (2003-10-31 17:09) [0]День добрый!
В следующем коде WA - это twordapplication.
Я успешно прошеол по всем закладкам, повставлял куда надо нужный текст, а теперь хочу закладки удалить. Однако,
почему-то не все закладки удаляются.
wa:twordapplication;
count_:tolevariant;
...
try
l:=wa.activedocument.bookmarks.Get_Count;
for k:=1 to l do
begin
count_:=k;
wa.activedocument.Bookmarks.Item(count_).delete;
end;
except
end;
В чем дело, не знаете, Мастера?
← →
Донской © (2003-10-31 17:42) [1]Нет, понятно что там на самом деле цикл от 0 до L-1 это я так, однако больше половины заклвдок остается в документе не удаленными...
← →
Sandman25 © (2003-10-31 17:44) [2]Попробуйте for 0 to L заменить на for L downto 0
← →
Донской © (2003-10-31 18:10) [3]Хм... Хорошо, пять сек...
Ух ты, сработало!
Спасибо!
Страницы: 1 вся ветка
Текущий архив: 2003.11.13;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.05 c
