[logan22]

Не, не пашит.

Опять зависает!)
А конкретнее если использовать Ваш код то жалуется на строчку

Код:

 if n=0 then Memo1.Lines.Delete[i];

а если взять i в скобки то откомпилируется и зависит!
ах да забыл сказать у меня Delphi 7