Главная страница
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.029 c
3-1090466241
raptorus
2004-07-22 07:17
2004.08.15
Уважаемые мастера подскажите как можно просмотреть кодировку файл


14-1091171658
ИдиотЪ
2004-07-30 11:14
2004.08.15
Что вас больше достает в работе?


11-1078385728
ssk
2004-03-04 10:35
2004.08.15
Ошибка в архиве


14-1090519291
DSKalugin
2004-07-22 22:01
2004.08.15
скоро Internet Explorer закроют :-)))


1-1091186987
Вика
2004-07-30 15:29
2004.08.15
пересечения диапазонов