Форум программистов, компьютерный форум, киберфорум
C++ Builder
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
0 / 0 / 0
Регистрация: 20.05.2020
Сообщений: 76
RAD XE4+

Выделение цветом слова в RichEdit

08.11.2021, 14:33. Показов 1273. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Выделяю в динамически созданном RichEdit искомое слово цветом, код работает верно, но как-то долго, 4000 строк обрабатывает около 30 секунд


C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
    //подсветка ERROR
                TSearchTypes Stype;
                Stype = Stype << stMatchCase;
                UnicodeString Text=L"ERROR";
                    int start=0,stop=0;
                          for(int i = 0; i < pRichEdit->Lines->Count; i++)
                            {
                             start = pRichEdit->FindText(Text,start+stop,pRichEdit->Text.Length(),Stype);
                             stop  = Text.Length();
                             pRichEdit->SelStart=start;
                             pRichEdit->SelLength=stop;
//                           pRichEdit->SelAttributes->Style=
//                           pRichEdit->SelAttributes->Style<<fsBold;
                             pRichEdit->SelAttributes->Color=clRed;
                             }
Может FindText отрабатывает долго сам по себе, или можно как то по другому подойти к этой задаче?
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
08.11.2021, 14:33
Ответы с готовыми решениями:

RichEdit: выделить некоторые слова другим цветом (MFC)
Есть два едита, нужно будет из одного перегнать текст в другой по нажатию кнопки, притом если некоторые слова будут попадаться то...

Выделение цветом слов в RichEdit
Добрый день! Понимаю, что такая тема была не раз, но я так и не смог разобраться в этом. Мне нужно сделать подпрограмму, которая бы искала...

RichEdit - Выделение цветом слов
У мя условие, я выделяю текст в ричедите, по нажатию кнопки проверяется если слово больше 12 символов, то окрашиваются последние 3 символа...

1
place status here
 Аватар для gunslinger
3190 / 2227 / 640
Регистрация: 20.07.2013
Сообщений: 6,023
08.11.2021, 20:19
Попробуй такой поиск:
Поиск слов в RichEdit
RichEdit и FindText, поиск текста в обратном направлении
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
08.11.2021, 20:19
Помогаю со студенческими работами здесь

Выделение цветом слова из текста
Есть программа, не могу найти, как сделать, чтобы она не просто выводила весь текст, а выбранное слово выделяло цветомprogram Files; uses...

Выделение цветом определенного слова в Gridview
Требуется &quot;подсветка&quot; определенного слова из набора (например, хорошо и плохо) в Gridview то ли выделение фоном ячейки таблицы, то ли...

Выделение при поиске искомого слова другим цветом
Есть поиск по сайту, необходимо, чтобы слово которое ищешь выделялось другим цветом Вот сам код поиска, куда что сдесь нужно вставить?...

Выделить цветом строку RichEdit
идем по всем строкам RichEdit, если строка кончается на '!' то выделяем строку красным, если нет, то зеленым. for i := 0 to...

Не выделяется цветом строка в RichEdit
procedure TForm1.Button2Click(Sender: TObject); var i: integer; begin for i:=0 to richedit1.Lines.Count-1 do begin if ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Уведомление о неверно выбранном значении справочника
Maks 06.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .
Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt
8Observer8 05.04.2026
Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .
AkelPad-скрипты, структуры, и немного лирики..
testuser2 05.04.2026
Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .
Отображение реквизитов в документе по условию и контроль их заполнения
Maks 04.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .
Фото всей Земли с борта корабля Orion миссии Artemis II
kumehtar 04.04.2026
Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .
Вывод диалогового окна перед закрытием, если документ не проведён
Maks 04.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .
Программный контроль заполнения реквизитов табличной части документа
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: 1. Реализовать контроль заполнения реквизита. . .
wmic не является внутренней или внешней командой
Maks 02.04.2026
Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru