Как удалить все между скобками, включая скобки? Проблема в том, что пробелы расположены по разному:
И как сделать что бы после обработки получился текстовый файл (то есть удалить все между <>, включительно, удаляя лишние пробелы):
Делаю вот так: но не весь текст обрабатывает правильно:
var
ft, ft2: TextFile;
i: integer;
s:string;
Begin
......................................
while(pos('<',s)>0)and(pos('>',s)>0) do
Delete(s,Pos('<',s),Pos('>',s)-Pos('<',s)+2);
........................................
Обрабатываетcя вот так:
Какой хороший(тут пробел)<03.04.2018>сегодня день После обработки - Какой хороший егодня день (то есть исчезла буква с в слове сегодня)
Какой хороший(тут пробел)<03.04.2018>(тут пробел)сегодня день После обработки в этой строке все отлично, то есть: Какой хороший сегодня день
Какой хороший<03.04.2018>(тут пробел)сегодня день После обработки Какой хорошийсегодня день (нет пробела между хороший и сегодня)
А должны быть все строки вот в таком виде:
Какой хороший сегодня день
Какой хороший сегодня день
Какой хороший сегодня день
+2
, а+1
. И после удаления проверять, не оказалось ли в месте удаления два пробела подряд.replace()