Главная страница
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.047 c
4-1089026487
lister
2004-07-05 15:21
2004.08.15
Внешним ползунком двигать текст в MEMO


14-1090471679
syte_ser78
2004-07-22 08:47
2004.08.15
Как уговорить "звукозапись" писать больше одной минуты?


3-1090240496
Aslan
2004-07-19 16:34
2004.08.15
Как с помощью SQL добавить данные в поле типа Memo?


11-1060280346
BelchonokH
2003-08-07 22:19
2004.08.15
У кого -нибудь есть компонент для работы UDP протоколом?


4-1088790438
Svoy Chelovek
2004-07-02 21:47
2004.08.15
Выключение компа