Показать сообщение отдельно
  #8  
Старый 28.02.2012, 13:08
Pyro Pyro вне форума
Так проходящий
 
Регистрация: 18.07.2011
Сообщения: 805
Версия Delphi: 7Lite
Репутация: 6063
По умолчанию

Цитата:
после (.ru) перенос на новую строку
PHP код:
memo1.Text := StringReplace(memo1.Text'.ru''.ru'#13#10, [rfReplaceAll]); 
удалить пустые строки – примерно так же
Ответить с цитированием