[Skarabey666]

Обработка текста.
Есть текст в блокноте, такого типа:

mail@mail.ru
mail@mail.ru
mail@mail.ru
mail@mail.ru
mail@mail.ru

точнее список майл адресов который создаётся программой

но внём встречаются глюки, такого типа:

mail@mail.ru
mail@mail.ru
mail@mail.rumail@mail.ru
mail@mail.ru
mail@mail.rumail@mail.ru

в строку вписывается 2 майла без пробелов и каких либо знаков препинания

Задача : нужно удалить такие строки.

у меня есть варианты как можно это сделать но не могу сообразить как,
1) удалить строки где встречаются два знака (@)
2) удалять все что стоит после (.ru)
3) Поставить после (.ru) перенос на новую строку

Помогите пожалуйста решить такую задачку, заранее благодарю.

[NumLock]

может правильней подкорректировать программу, которая создает такой файл?

[lmikle]

Думаю вот это тебе подойдет:
http://www.howtodothings.com/compute...in-delphi.html

[Skarabey666]

Программку исправить не могу =(.
А вот на счёт проверки на правильность адресов это интересно, но только вот не могу разобраться в написанном =( как всё это собрать, если несложно помогите пожалуйста, объясните как использовать эту функцию или исходник.

[Skarabey666]

Придумал ещё 1 вариант решения этой задачки но не могу сообразить как это сделать в силу своего незнания =) использовать функцию FindeAdnReplase только вместо текста нажимать клавишу Enter

[NumLock]

домен верхнего уровня только ".ru"?

[Skarabey666]

да домен только .RU

[Pyro]

после (.ru) перенос на новую строку

PHP код:

memo1.Text := StringReplace(memo1.Text, '.ru', '.ru'#13#10, [rfReplaceAll]); 


удалить пустые строки – примерно так же