Цитата:
|
Сообщение от v1s2222
Тебе ж надо вывести все строки, в которых есть слово "read="0"", тогда просто пиши так:
Код:
s:='';
for i:=0 to memo1.Lines.Count-1 do
if(pos('read="0"', memo1.Lines.Strings[i]) > 0) then begin
s:=s+Memo1.Lines.Strings[i]+#13;
end;
s:=trim(s);
ShowMessage(s); |
Выводит
read="0"
read="0"
read="0"
Говорю же что все разделено только квадратами тоисть там одна строка как на самом деле 4 наверника