![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
MSWord [D7, 95/98, XP]
Farel © (2008-01-12 07:56:00)Здравствуйте!
Подскажите пожалуйста как работать Word'om(97-2003) с под delphi
Использую TwordApplication.
Необходимо сделать:
поиск текста в документе;
выделение строки с определенным номером.
удаление выделенного...
Спасибо!
Максимка (2008-01-12 22:17:00) [1]help PLZ!
__!ERIX_ (2008-01-12 16:01:00) [2]люди, а кто нить писал макросы для ворда?
например для определения колва строк в документе?
или
для вычисления текущий позиции курсора в документе.ну как внизу сам ворд пишет. типа номер строки такой-то, символ такой-то.
и
перехода с одной строки на следующую и т.д.
сеньк.
__!ERIX_ (2008-01-12 08:19:00) [3]try
Msword.Visible:=false;
except
wordApplication1 := TwordApplication.Create(Self);
end;
wordApplication1.Visible := true;
//filename:variant - var wordApplication1.Documents.Open(filename,emptyparam,emptyparam,emptyparam,emptyp aram,emptyparam,emptyparam,emptyparam,emptyparam,emptyparam,emptyparam,emptypara m,emptyparam,emptyparam,emptyparam);
// wordApplication1.Selection.SetRange(1,200);
// wordApplication1.Selection.MoveDown(EmptyParam,EmptyParam,EmptyParam);
// wordApplication1.Selection.EndKey(EmptyParam,EmptyParam);
wordApplication1.Selection.SetRange(0,wordApplication1.Selection.EndKey(EmptyPar am,EmptyParam));
s123:=wordApplication1.Selection.Range.Text;
wordApplication1.Selection.Collapse(emptyparam);
// wordApplication1.Selection.HomeKey(EmptyParam,EmptyParam);
wordApplication1.Selection.MoveDown(EmptyParam,EmptyParam,EmptyParam);