закладки в ворде

[delphi7]

Есть вордовский документ в нем есть две закладки, как удалить текст между этими закладками.

[Evgeniy26]

1. Преходишь на первую закладку.
2. Получаешь позицию курсора.(start)
3. Переходишь на вторую закладку.
4. Получаешь позицию курсора.(end)
5. Выделяешь. (W.ActiveDocument.Range(Start, End))
4. Удаляешь. (W.Selection.Delete)

[delphi7]

в том-то и проблемма, что я не знаю как получить позицию курсора

[Evgeniy26]

W.Selection.Start;

[Sasha_Smirnov]

Вышеприведённый алгоритм (пока его не редактировали) удаляет кусок вместе с закладками — а не между ними.

[Evgeniy26]

Передвинься на позицию назад или вперед соответсвенно от закладок.

[delphi7]

перхожу к первой закладке
W.Selection.goto(What:=wdGoToBookma rk, name:='зак1');
а дальше что просто написать W.Selection.Start; ...

[delphi7]

всем ответившим большое спасибо!
все сделал...

[Evgeniy26]

Все равно выложу примерчик:

var
  W: Variant;
  _Start, _End: Integer;
begin
  W := CreateOleObject('Word.Application');
  W.Documents.Open('C:\Example.doc');
  W.Selection.GoTo(-1, unAssigned, unAssigned, 'Закладка1');
  _Start := W.Selection.Start;
  W.Selection.GoTo(-1, unAssigned, unAssigned, 'Закладка2');
  _End := W.Selection.Start;
  W.ActiveDocument.Range(_Start, _End).Select;
  W.Selection.Delete;
  W.Visible := True;

Закладки не удаляются, а изменяется позиция закладок. Ну если важна позиция закладок, это можно исправить, т.к нам известны предыдущие позиции закладок.

[delphi7]

Есче раз большое спасибо!