Форум: "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.012 c