Чтение данных Integer из файла в Delphi 7

Для начала объявим переменные: VAR myText : TextFile; // переменная, куда будет записано содержимое нашего файла n1, n2, n3 : Integer; // n1 - первое число в файле , n2 - второе число, n3 - третее число в файле. Полный код процедуры:
procedure TForm1.Button1Click(Sender: TObject);
 var myFile : TextFile;
n1, n2, n3 : Integer;
begin
AssignFile(myFile, 'Test.txt'); Reset(myFile) ; //файл есть и его надо открыть для чтения (с первой строки)
 while not Eof(myFile) do
 begin
 ReadLn(myFile, n1, n2, n3);
 ShowMessage(IntToStr(n1)+' '+ IntToStr(n2)+' '+ IntToStr(n3));
 end;
 end;