Скачать: CL | DM;

Как очистить String от лишних пробелов и символов переноса строки   Найти похожие ветки 

← →
RealDummy   (2002-05-28 13:55) [0]

Помогите, пожалуйста!
Есть текст, помещённый в переменную типа String. Необходимо заменить:
1. Пробелы, идущие подряд, на 1 пробел.
2. Символы переноса строки, идущие подряд, на 1 символ переноса строки.
3. Символы переноса строки и пробелы, идущие подряд, на 1 символ переноса строки.
С пунктом 1 всё получилось, а вот с переносами строки почему-то проблемы.
Очень прошу помочь!

---

← →
AFROLOV ©   (2002-05-28 14:00) [1]

Символы переноса строки - это скорее всего 2 символа chr(13)+chr(10). Находишь эту комбинацию если за ней сидет такая же то ее удаляешь.
А еще было бы не плохо привести код который не работает.

---

← →
MBo ©   (2002-05-28 14:00) [2]

простой, но небыстрый метод
i:=pos(#13#10#13#10,s);
while i>0 do begin
delete(s,i,2);
i:=pos(#13#10#13#10,s);
end;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.008 c