Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.08.15;
Скачать: CL | DM;

Вниз

Снова Word (№ слова -> предложение)   Найти похожие ветки 

 
Pavelkq   (2004-07-29 15:09) [0]

Имею программу, которая знает себе номер слова в ворде, типа
CreateOleObject("Word.Application").Documents.Open("имя файла").Words.Item(№)
Вот этот № и есть номер слова в ворде. Мне нужно создать новый документ, включающий в себя предложение, в которое входит слово с номером №.
 Я написал функцию, которая возвращает № первого и последнего слова данного предложения. Пеперь, казалось бы, в цикле собирай все это в String, но нет. В таком варианте в Stringe будет набор слов, не разделенный пробелами. Вот бы все это повыделять(тогда пробелы тоже выделяются) и уже присвоить Stringу выделение? Или еще как?


 
Pavelkq   (2004-07-29 15:48) [1]

На форуме по VBA не подсказали следующей код:
public function Sntnc()as string
Selection.Move wdSentence, -1
Selection.EndOf wdSentence, wdExtend
Sntnc = Selection.Text
End Sub

 Как теперь это адаптировать в Дельфи?



Страницы: 1 вся ветка

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

Наверх




Память: 0.46 MB
Время: 0.055 c
3-1090561508
PhAn
2004-07-23 09:45
2004.08.15
Запись чтение Blob-fields использую BDE


14-1090809941
ProgC
2004-07-26 06:45
2004.08.15
Какая должность лучше?


1-1091198878
Antonmm
2004-07-30 18:47
2004.08.15
GIF на форме


4-1089046492
ИМХО
2004-07-05 20:54
2004.08.15
CLSID


6-1087146782
Apocalepse
2004-06-13 21:13
2004.08.15
Socket!!! глючит что то с сокетом