Как убрать из RichEdit все слова нечетной длины?

@Xleb · Регистрация: 07.03.2015

Студворк — интернет-сервис помощи студентам

Как убрать из RichEdit все слова нечетной длины?

Есть два ричэдита.в один я считываю с файла, во второй ричэдит мне нужно записать то что я считал, без слов непарной длины.

C++
1
2
3
4
5
6
7
8
void __fastcall TForm7::Button2Click(TObject *Sender)
{String str;
for (int i=0;i<size;i++){
str=RichEdit1->Lines->Strings[i] ;
int d=str.Length();
 
//RichEdit2->Lines->Add(str);
}

Вот это код второй кнопки , и в нем же нужно сделать то что в задании и сразу вывод во второй ричэдит
Я не понимаю как мне это сделать.

@D1973 · 22.07.2016, 07:05

Все очень просто...
Берешь первую строку из ричэдита1
Делишь ее на слова
Проверяешь длину слова
Если длина четная - записываешь в строковую переменную, если нет - не записываешь
Закончились слова в строке - записываешь получившуюся строковую переменную в ричэдит2
Обнуляешь строковую переменную
Берешь вторую строку из ричэдита1
...

Новые блоги и статьи Все статьи Все блоги /
Доступность команды формы по условию Maks 07.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА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. Реализовать контроль заполнения реквизита. . .

@D1973 Модератор 9929 / 6467 / 2457 Регистрация: 21.01.2014 Сообщений: 27,423 Записей в блоге: 3
	22.07.2016, 07:05
	Все очень просто... Берешь первую строку из ричэдита1 Делишь ее на слова Проверяешь длину слова Если длина четная - записываешь в строковую переменную, если нет - не записываешь Закончились слова в строке - записываешь получившуюся строковую переменную в ричэдит2 Обнуляешь строковую переменную Берешь вторую строку из ричэдита1 ... 0