Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Delphi Оси в Tchart Как определенной серии присвоить свою ось в коде или как на уже выделенной оси изменить надписи,я в ступоре. Добавлено через 22 минуты Мне нужно чтобы по нажатию кнопки нижняя ось менялась от... https://www.cyberforum.ru/ delphi-beginners/ thread1843306.html Сделать, чтобы при задании цены через скроллбар или едит, удалялись или появлялись виды пицц Delphi
всем привет! мне нужно чтобы -при задавании цены через скроллбар или едит, в зависимости от цены удалялись или появлялсь виды пицц. или какими компонентами лучше это сделать? дайте направление...
Delphi Вывод в мемо https://www.cyberforum.ru/ delphi-beginners/ thread1843255.html
Всем привет) Столкнулся с такой проблемкой. Написал программу, задача которой сортировать массив двумя разными способами сортировки(Шелла/Пузырька),но не получается вывести "корректно" действия...
Delphi Мат.ожидание площади круга Есть программа,которая методом Монте-карло считает площадь круга, как найти мат.ожидание площади, кто знает? procedure TForm1.Button1Click(Sender: TObject); var masx1: array of real; masy1:... https://www.cyberforum.ru/ delphi-beginners/ thread1843200.html
Delphi Вычерчивание замкнутого контура (звезда)
Помогите найти ошибку в коде. Звезда не замыкается :( unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type
Delphi Проверка существующего имени в ListBox https://www.cyberforum.ru/ delphi-beginners/ thread1843087.html
Добрый вечер. Друзья помогайте!!! На главной форме расположен ListBox со списком наименований баз данных. На форме добавления базы данных, в Edit1.Text заносится имя новой базы. Нужно проверить,...
Delphi Ошибка при добавлении(поля не найдены) Привет всем. Задачи: 1. отобразить вместо id - имя поставщика поставщиков и имя мебели из других таблиц. 2. возможность сортировки, при клике на название столбца в DBgrid. Для 1-й задачи был... https://www.cyberforum.ru/ delphi-beginners/ thread1843070.html Delphi Стили заполнения областей
Подскажите пожалуйста, почему все стили уехали за пределы формы, никак не могу это исправить. вот код unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics,...
Delphi Не работает repeat until https://www.cyberforum.ru/ delphi-beginners/ thread1843043.html
begin Eps := 0.001; repeat x := -0.9; repeat y0 := 0; k := 1; repeat a := (exp(ln(x)*(2*k + 1)))/(k*(k+1)*(2*k+1)); y := y0 + a;
Delphi Задача на массивы https://www.cyberforum.ru/ delphi-beginners/ thread1843033.html
Даны последовательности целых чисел X1,...,Xn и Y1,...,Yn . Верно ли, что эти две последовательности отличаются не более, чем порядком следования членов?
Delphi Не всегда срабатывает onClick при изменении состояния checkBox
Ребят, такая проблема: делаю АРМ кое какой, и в начале заметил что onClick срабатывает при изменении состояния checkbox, и исходя из этого сделал уже 60% программы. Чекбоксов у меня в программе...
Delphi Задача на массивы По окружности написаны числа 12 чисел a1,a2,...,a12 . Если их списать, начиная с номера k , то получится вектор Xk=(ak,ak+1,...,ak+11 , где под a13 понимается a1 , под a14 понимается a2 и т.д.... https://www.cyberforum.ru/ delphi-beginners/ thread1843022.html
57 / 7 / 4
Регистрация: 18.04.2009
Сообщений: 425
08.11.2016, 11:11  [ТС] 0

Работа метода Word.Selection.Find при поиске в документе Word - Delphi - Ответ 9740785

08.11.2016, 11:11. Показов 9026. Ответов 4
Метки (Все метки)

Ответ

Mawrat Спасибо огромное за ответ! но к сожалению это не работает.

в случае, если шаблон найден (слово полностью)
Delphi
1
2
3
4
 if Word1.Selection.Find.Execute(Replace := wdReplaceAll, MatchWholeWord:=true) then
begin
 showmessage('!!!');
end;
выскакивает '!!!'

в случае если шаблон не найден как слово полностью, но присутствует в тексте как часть слова - тоже выскакивает '!!!', хотя должно появляться сообщеие '???'
Delphi
1
2
3
4
 if not Word1.Selection.Find.Execute(Replace := wdReplaceAll, MatchWholeWord:=true) then
begin
 showmessage('???');
end;
например я запустил поиск и замену, заменил все вхождения как слова полностью слова ум на $$ , получил '!!!', потом прогоняю поиск по второму разу, и если есть слова разУМ, сУМка и тд, снова получаю '!!!', если же нет таких слов, в котороых искомый текст встречается как часть слова, то только тогда получаю '???'. Не могу понять...

Вернуться к обсуждению:
Работа метода Word.Selection.Find при поиске в документе Word Delphi
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
08.11.2016, 11:11
Готовые ответы и решения:

Что именно возвращает функция Selection.Find из библиотеки Word?
Кто-нибудь может подсказать что именно возвращает функция appWd.Selection.Find ? И как...

Поиск в документе Word через Find, но с конца документа к его началу
Здравствуйте, как организовть поиск в документе Ворд Финдом но с конца документа к его началу ...

Работа с колонтитулами в документе MS Word
Доброго времени суток! Возможно, эта тема поднималась, и не раз, но я либо туплю, либо плохо гуглю...

"работа с выделением Selection объекта word.Bookmarks и .shapes через excel"
Доброе время суток. Возникла проблема: Суть имеется 2 макроса оба запускаются из excel 1-ый...

4
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
08.11.2016, 11:11

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Почему ЗАВИСАЕТ компьютер при поиске по Word-файлам?
Почему ЗАВИСАЕТ компьютер при поиске по Word-файлам? (100-файлов отрабатывает нормально, далее...

Ошибка при выводе информации в документе Microsoft Word
Здравствуйте. Подскажите, пожалуйста, как исправить такую ошибку, из DataGridView нужно вывести...

Delphi + Таблица в документе Word - ошибка при форматировании заголовка
Программа создает при помощи объекта WordDocument документ Word, который содержит большое...

Delphi+MS Word. selection
Вечер добрый! Проблема заключается в следующем. Из буфера обмена в документ вставляется...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.