Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.05.21;
Скачать: 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 вся ветка

Текущий архив: 2006.05.21;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.03 c
9-1129234201
$noopy.MC
2005-10-14 00:10
2006.05.21
Зацените игруху мою (openGL)


2-1146648983
mida
2006-05-03 13:36
2006.05.21
DBEdit


5-1130834325
Schooler
2005-11-01 11:38
2006.05.21
Редакторы свойств и редакторы компонентов + WYSWYG


15-1146151811
pasha_golub
2006-04-27 19:30
2006.05.21
Бильярдные симуляторы


15-1145873028
Суслик
2006-04-24 14:03
2006.05.21
Кто ставил update 2 на bds2006?