Цикл выполнение memo по строкам?
Что написали, то и имеете. В цикле-то только перебор строк. А работа со строкой у Вас идёт уже после цикла.
Вообщем begin end забыли!
внимательно просмотрите 2ю и (3,4) строки