Не читается 3я строчка
 

Помогите новичку… Вообщем не читается третья строчка, а просто светится белый экран…
Где я мог допустить ошибку?

program Resource;

var data : resource;//наш ресурс
str, str2, str3 : string;
index : integer;

begin
data := OpenResource('/data.txt');//открытие ресурса

if (resourceAvailable(data)) then //проверка

begin

str := ReadLine(data);//читаем строку
str2:= ReadLine(data);
str3:= ReadLine(data);

CloseResource(data);//закрываем ресурс
end;

ShowForm; //создаём форму...
index := FormAddString('Text_1 :' + str);//выводим инфу из ресурса
index := FormAddString('Text_2 :' + str2);
index := FormAddString('Text_3 :' + str3);
Delay(10000);//задержка
end.

Re: Не читается 3я строчка
 

В файле ресурса после третьей строчки поставь еще одну пустую строку...

Re: Не читается 3я строчка
 

Большое спасибо...! Теперь отображается и нет белого экрана...