Тема: Занос в Memo
Показать сообщение отдельно
  #1  
Старый 10.12.2011, 22:31
CEPEJJJJJKA CEPEJJJJJKA вне форума
Прохожий
 
Регистрация: 13.11.2011
Сообщения: 7
Репутация: 10
По умолчанию Занос в Memo

Вот код:
Код:
YouMessage:=idhttp1.Get ('http://vkontakte.ru/id1');
 Delete(YouMessage,1,pos('<span class="online">',YouMessage)+length('<span class="online">')-1);
 Delete(YouMessage,pos('</span>',YouMessage),length(YouMessage ));
 Mmo2.text:=YouMessage;
     end;
Помогите сделать если такой строки не находит то mmo2.text должно быть пустым
Ответить с цитированием