Форум: "Corba";
Текущий архив: 2006.05.21;
Скачать: [xml.tar.bz2];

Вниз

Не понятно как перейти в конец документа word?   Найти похожие ветки 

← →
r9000   (2005-06-23 14:07) [0]

Так как все таки перейти в конец файла word после открытия сохраненнго файла для вставки таблицы? А то пока не очень понятно из прочитанного.

---

← →
Digitman ©   (2005-06-23 16:15) [1]

а макрос записать да посмотреть, как сам Ворд это делает, да переложить увиденное там на Паскаль (чуть ли не один-в-один) - не судьба ?

---

← →
YurikGL ©   (2005-06-23 21:49) [2]

Я, кажется давал ссылку
http://delphimaster.net/view/1-1119509721/

Там есть как перейти в конец документа.

---

← →
GanibalLector ©   (2005-06-24 01:18) [3]

Как-как...вот так :

procedure TForm1.Lamers__Click(Sender: TObject);
var WordApp:Variant;
   I:Integer;
begin
 WordApp := CreateOleObject("Word.Application");
 try
   WordApp.Visible:=True;
   WordApp.Documents.Open("C:\2.doc");
   for I:=0 to 5 do
   begin
     WordApp.Selection.HomeKey($6);
     Sleep(500);
     WordApp.Selection.EndKey($6);
     Sleep(500);
   end;
   WordApp.ActiveDocument.Close;
   WordApp.Quit;
 finally
   WordApp:=UnAssigned;
 end;
end;


---

← →
r9000   (2005-06-24 10:21) [4]

Спасибо WordApp.Selection.EndKey($6) вроде бы подходит,
но для чего это делать в цикле for I:=0 to 5 do не очень понятно.

---

← →
GanibalLector ©   (2005-06-24 19:45) [5]

>но для чего это делать в цикле for I:=0 to 5 do не очень понятно

Для примера,вообще-то.Дабы ты понял ;)

---

Страницы: 1 вся ветка

Форум: "Corba";
Текущий архив: 2006.05.21;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.46 MB
Время: 0.019 c