Форум: "Corba";
Текущий архив: 2007.04.29;
Скачать: [xml.tar.bz2];
Вниз
Bookmarks Найти похожие ветки
← →
john_mag © (2005-11-14 10:35) [0]Уважаемые знатоки, подскажите, как можно скопировать часть документа в doc файле между двумя закладками? У меня постоянно выскакивает ошибка несовместимость типов, когда я пытаюсь сделать следующим образом:
//Copy-Paste
procedure TForm1.Button8Click(Sender: TObject);
var
Rng: Variant;
What, Which,Count,Name,Name1,Name2,Start,End_: OleVariant;
begin
What:= wdGoToBookmark;
Which:= EmptyParam;
Count:= EmptyParam;
Name1:= "MyBookmark1";
Name2:= "MyBookmark2";
Start:= WordApplication1.ActiveDocument.GoTo_(What,Which,Count,Name1);
End_:= WordApplication1.ActiveDocument.GoTo_(What,Which,Count,Name2);
Rng:= WordApplication1.ActiveDocument.Range(Start,End_);
What:= wdGoToPage;
Which:= EmptyParam;
Count:= -21;//на 1 страницу
Name:= "";
WordApplication1.Selection.GoTo_(What,Which,Count,Name);
end;
← →
YurikGL © (2005-11-15 20:55) [1]
> как можно скопировать часть документа в doc файле между
> двумя закладками?
Если в буфер, что-то типа
App.ActiveDocument.Range(
App.ActiveDocument.Bookmarks.Item(1).Start,
App.ActiveDocument.Bookmarks.Item(2).Start).select;
потом
app.selection.copy;
← →
john_mag © (2005-11-16 09:41) [2]Да, но копируется только текст! А я бы хотел полностью с номерами страниц, колонтитулами и тд, те со всеми регалиями! спасибо!
Страницы: 1 вся ветка
Форум: "Corba";
Текущий архив: 2007.04.29;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.046 c
