Показать сообщение отдельно
  #11  
Старый 02.12.2010, 22:36
Hamsi Hamsi вне форума
Прохожий
 
Регистрация: 02.12.2010
Сообщения: 22
Репутация: 10
По умолчанию

Кусок исходного кода из мемо
Цитата:
</th>квадрат</tr>квадратквадрат<tr id="mess1584" read="1" >
Твой код
Цитата:
s:='';
for i:=0 to memo1.Lines.Count-1 do
if(pos('<tr class='+CHR(39)+'newRow'+CHR(39)+'id=', memo1.Lines.Strings[i]) > 0) then begin
s:=s+Memo1.Lines.Strings[i]+#13;
end;
s:=trim(s);

ShowMessage(s);
Выводит пустое окно,но если в мемо самостоятельно вставить из браузер строку то все норм!Из за того что слито очень наверника не хочет
Квадрат я имею в виду настроящий квадрат(перенос на новую строку)
Ответить с цитированием