| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Не понятно как перейти в конец документа word? [D7, Win2k]
r9000 © (2005-06-23 14:07:00)Так как все таки перейти в конец файла word после открытия сохраненнго файла для вставки таблицы? А то пока не очень понятно из прочитанного.
GanibalLector (2005-06-24 19:45:00) [1]>но для чего это делать в цикле for I:=0 to 5 do не очень понятно
Для примера,вообще-то.Дабы ты понял ;)
r9000 (2005-06-24 10:21:00) [2]Спасибо WordApp.Selection.EndKey($6) вроде бы подходит,
но для чего это делать в цикле for I:=0 to 5 do не очень понятно.
GanibalLector (2005-06-24 01:18:00) [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;
YurikGL (2005-06-23 21:49:00) [4]Я, кажется давал ссылку
http://www.delphimaster.ru/cgi-bin/forum.pl?id=1119509721&n=0
Там есть как перейти в конец документа.
Digitman (2005-06-23 16:15:00) [5]а макрос записать да посмотреть, как сам Ворд это делает, да переложить увиденное там на Паскаль (чуть ли не один-в-один) - не судьба ?
| |
