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

[Katmai]

Подскажите пожайлуста, как считать последнюю строку загружаемого файла ?

[artemavd]

Для чего? И как Вы собираетесь считать последнюю строку загружаемого файла, если файл еще не загружен, т.е. не прочтен?

[Katmai]

Сори что не так выразился, мы загружаем файл, считываем его.
Далее нам нужно некоторому значению n присвоить значение последней строки прочитаного файла.

[artemavd]

Куда файл-то грузите? В Мемо1?

[Katmai]

Я снова не так выразился, мы открываем файл считываем и закрываем.
При этом последнюю строку нам нужно присвоить значению n.

[artemavd]

Могу предположить только так (судя из ваших тезисов):

procedure TForm1.Timer1Timer(Sender: TObject);
var
 n: integer;
begin
 Form1.Memo1.Lines.LoadFromFile('2.txt');
 for n:=0 to Form1.Memo1.Lines.Count do
 begin
  Form1.Label1.Caption:=IntToStr(n);
 end;
end;

загрузка файла и присвоение последней его строки в Lable.

[dmitriegorovih]

Ну вот смотрите

var
Fileot:Tstringlist;
n:string;
begin
Fileot:=Tstringlist.Create;
Fileot.LoadFromFile('C:\Текстовый документ.txt');
n:=Fileot.Strings[Fileot.count-1];
freeandnil(Fileot);
end;

[Katmai]

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

0000000
0000000
0000000

31

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

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

[Don Karleone]

файл текстовый?

[Vikenty]

function fn(FileName: string): string;
var
s: TStringList;
begin
s:=TStringList.Create;
s.LoadFromFile(FileName);
fn:=s.Strings[s.count];
s.Free;
end;