[Delta]

Как определить, что достигнут конец Memo?
Продолжаю мучение тестовой оболочки)
Принцип - подгружаю тектсовый документ в мемо, и оттуда считываю строки с определенным алгоритмом.
Не нашла функции определяющий последнюю строку и решила, что пусть осуществляется проверка:
последняя строка текстового файла будет = 0. Он проверяет каждый раз строчку и если она <>0 то продолжает заполнение полей теста. если равна нулю, то делает активной кнопку Завершить тест.
Вот код:

Код:

MemoEOF:=StrToInt(Memo_Temp.Lines[1+6*(vopros-1)]);
if MemoEnd<>0 then
PrFillFileds(Sender)
else
ResultButt.Visible:=true;

если не использовать этого я не знаю как завершить работу после последнего вопроса: ошибка естесственно. Однако все вопросы идут как положено.
если использовать это условие то почему-то "сдвигаются" строки. и вылетает ошибка несоответсвия типов оф коз.
сама программа прикреплена в архиве вместе с файлом теста.
ссылка на архив с прогой и тестом
http://rghost.ru/3958437