Вниз
Скачать: CL | DM;

Не понятно как перейти в конец документа 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.032 c
2-1146492614
Black Demon Night
2006-05-01 18:10
2006.05.21
DBLookupComboBox редактирование+добавление (Paradox)


3-1143730751
Alex_12345
2006-03-30 18:59
2006.05.21
Apollo: не работает....


4-1141325287
NightLord
2006-03-02 21:48
2006.05.21
Вывод на рабочий стол


2-1146417893
tickler
2006-04-30 21:24
2006.05.21
точное отслеживание времени


2-1146731374
De
2006-05-04 12:29
2006.05.21
При вызове функции из dll дает ошибку




   Наверх