Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.023 c
1-41288
Bless
2003-10-29 09:51
2003.11.13
Как узнать, сколько памяти занимает класс?


1-41376
Rasil
2003-10-30 02:17
2003.11.13
Перемещение формы


6-41797
Lord Of The Dark Wind
2003-09-14 09:49
2003.11.13
TClientSocket & TServerSocket


14-41947
Думкин
2003-10-20 04:43
2003.11.13
С днем рождения! 20 октября.


14-42117
Vlad Oshin
2003-10-24 14:45
2003.11.13
Не кажется ли Вам, что Достоевский доказал вину...