|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
07.06.2009, 04:27 | #1 | |
Пользователь Подтвердите свой е-майл
Регистрация: 03.01.2008
Сообщений: 49
|
Поиск, выделение, вопрос!?
Здрасте!
Как оформить код поиска, выделения.. и вопоса? надо чтоб происходило так: 1.Ищим слово "Delphi" в тексте: Цитата:
3.Если найдено слово и выделено, задается вопрос "Искать далее или заменить"! как это сделать?? если что-то не понятно с вопросом попробую объяснить по другому. ----- У меня есть функция поиска и замены, но я не могу с ней разобраться((( если она чем-то поможет вот: Код:
|
|
07.06.2009, 12:29 | #2 |
Форумчанин
Регистрация: 12.05.2007
Сообщений: 373
|
для поиска используй Pos или PosEx, для выделения текста делай
Код:
Код:
Перемен! - требуют наши сердца. Перемен! - требуют наши глаза.
В нашем смехе и в наших слезах, И в пульсации вен: "Перемен!Мы ждем перемен!" |
07.06.2009, 13:45 | #3 |
Участник клуба
Регистрация: 11.01.2009
Сообщений: 1,917
|
Немного расширю ответ Ntlegend и твою функцию которую ты привел.
Сделал немного комментарии чтобы тебе можно было идти дальше самому : Код:
"Заряженному танку в дуло не смотрят" @Dekmer in WoT
|
08.06.2009, 08:14 | #4 | |
Пользователь Подтвердите свой е-майл
Регистрация: 03.01.2008
Сообщений: 49
|
Цитата:
угу понятно! а как сделать чтобы при вопросе: Код:
И как сделать так чтобы при нажатии на mrNo программа продолжала искать дальше? если ничего не найдено то вывести сообщение: Код:
Последний раз редактировалось IIpopoK; 09.06.2009 в 05:49. |
|
10.06.2009, 11:06 | #5 | |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Цитата:
SelStart := Position; // ... с этой позиции SelLength := Length(SearchText); // ... этой длинны Нужно поменять цвет в SelAttributes Вот прям в хелпе написано: Код:
I'm learning to live...
|
|
10.06.2009, 13:43 | #6 | |
Участник клуба
Регистрация: 11.01.2009
Сообщений: 1,917
|
Цитата:
Код:
"Заряженному танку в дуло не смотрят" @Dekmer in WoT
|
|
11.06.2009, 11:06 | #7 | |
Пользователь Подтвердите свой е-майл
Регистрация: 03.01.2008
Сообщений: 49
|
Цитата:
----------------------------------------------------------- Просто фишка в том что функция то продолжает искать... но криво... Сделал вот так: Код:
А если я жму "Нет", то по сути функция должна пропустить найденное слово и искать дальше... но она не пропускает его с первого клика, а только после нажатий примерно так 2-4. вот.... Надо чтоб было так: 1. Найти слово. 2. Спросить "Заменить?" 2 варианта "да", "Нет". 3. Если "Да" - Заменить и искать дальше. 4. Если "Нет" - Пропустить слово и искать дальше. вот так... |
|
13.06.2009, 07:24 | #8 |
Пользователь Подтвердите свой е-майл
Регистрация: 03.01.2008
Сообщений: 49
|
Разобратся сам, спасибо!
вот рабочий код: Код:
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Выделение в Richedit | north | Общие вопросы Delphi | 21 | 22.05.2009 12:37 |
Поиск и выделение фрагмента в вордовском документе | Bobby | Общие вопросы Delphi | 1 | 17.04.2009 17:07 |
вопрос по Unix'у, поиск файлов | Gimi | Linux (Ubuntu, Debian, Red Hat, CentOS, Mint) | 1 | 13.03.2009 16:50 |
выделение | StasSv | Microsoft Office Excel | 8 | 26.01.2009 14:02 |
выделение | StasSv | Microsoft Office Excel | 2 | 10.11.2008 17:15 |