Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 09.10.2009, 18:54   #1
Lazio
Форумчанин
 
Регистрация: 25.02.2009
Сообщений: 113
По умолчанию Удаление знаков переноса.

Задач в окне RichEdit дан текст например:

hello
world!

сделать надо его в одну строку, иными словами удалить все переносы:

hello world!

И ещё вопрос задаю массив AnsiString s="abcde" будут ли у меня проверятся каждая буква при таком сравнении
Код:
for (...){
if (RichEdit1->Lines->Text[i]==s) {//}

}
Lazio вне форума Ответить с цитированием
Старый 09.10.2009, 19:26   #2
uberchel
Участник клуба
 
Аватар для uberchel
 
Регистрация: 19.01.2009
Сообщений: 1,486
По умолчанию

Так:
Код:
void __fastcall TForm1::btn1Click(TObject *Sender)
{
 redt1->Lines->Delimiter = '#13';
 redt1->Lines->DelimitedText= redt1->Text;
}
uberchel вне форума Ответить с цитированием
Старый 09.10.2009, 19:32   #3
Lazio
Форумчанин
 
Регистрация: 25.02.2009
Сообщений: 113
По умолчанию

хм..не работает
Lazio вне форума Ответить с цитированием
Старый 09.10.2009, 19:37   #4
uberchel
Участник клуба
 
Аватар для uberchel
 
Регистрация: 19.01.2009
Сообщений: 1,486
По умолчанию

Что пишет, вы я вижу в цикле что то обработать хотите, этот код без цикла все в RichEdit Меняет:
Вложения
Тип файла: rar test.rar (33.9 Кб, 6 просмотров)
uberchel вне форума Ответить с цитированием
Старый 09.10.2009, 19:43   #5
Lazio
Форумчанин
 
Регистрация: 25.02.2009
Сообщений: 113
По умолчанию

а вот как оно работет, но мне надо чтобы удаляло не через строчку а вот так

ааа
ffff

aaafff то есть как добавить к Strings[1] все остальные до count
Lazio вне форума Ответить с цитированием
Старый 09.10.2009, 21:38   #6
DomiNick
Студент, не
Старожил
 
Аватар для DomiNick
 
Регистрация: 29.01.2009
Сообщений: 2,067
По умолчанию

Хм... У меня в Делфи7 тоже не фурычит...
Да и чтот не встречал примеров с использованием подобного... =\\

Лучше наверное так:
Код:
RichEdit1.Text:=StringReplace(RichEdit1.Text, #13#10, ', ', [rfReplaceAll]); //rfReplaceAll, rfIgnoreCase
А можно и посимвольно делать..... ^____^
I am the First of Cyber Evolution...
I am the First to Program your Future...
DomiNick вне форума Ответить с цитированием
Старый 09.10.2009, 22:19   #7
uberchel
Участник клуба
 
Аватар для uberchel
 
Регистрация: 19.01.2009
Сообщений: 1,486
По умолчанию

Усе фурчит )
А со StringReplace в Builder C++ надо так:

Код:
RichEdit1->Text = StringReplace(RichEdit1->Text, '#13',' ', TReplaceFlags() << rfReplaceAll);

Последний раз редактировалось uberchel; 09.10.2009 в 22:34.
uberchel вне форума Ответить с цитированием
Старый 09.10.2009, 22:24   #8
Lazio
Форумчанин
 
Регистрация: 25.02.2009
Сообщений: 113
По умолчанию

#13#10, ругается на это
Lazio вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
удаление не нужных знаков после запятой. Alar Общие вопросы Delphi 4 31.05.2012 19:59
Знак переноса. RichEdit. Lazio Общие вопросы C/C++ 3 28.09.2009 13:28
По поводу переноса БД с 1 компа на другой Droid БД в Delphi 17 19.06.2009 04:43