Как считать последнюю строку ?

[Don Karleone]

в общем, если файл текстовый, а прочитать надо последнюю строку, то можно сделать так:

procedure TForm1.Button1Click(Sender: TObject);
var
  f: textfile;
  st: string;
begin
  assignfile(f,'aaa.txt');
  reset(f);
  while not eof(f) do
    readln(f,st);
  closefile(f);

  Label1.Caption:=st;
end;

[Katmai]

Большое спасибо ! Помогло ! )

[dmitriegorovih]

Вобщем у нас есть файл --

0000000
0000000
0000000

31

Нужно открыть его, прочесть до строки ' ' и следующую строку присвоить значению N

Пробывал предыдущий способ, выдаёт ошибку...

У меня всё работает нормально

[Katmai]

Это у меня руки еще кривые