Показать сообщение отдельно
  #1  
Старый 11.04.2014, 09:08
Ahton Ahton вне форума
Прохожий
 
Регистрация: 05.01.2007
Сообщения: 38
Репутация: 10
По умолчанию Изменить n-строку с конца файла

Добрый день ! Подскажите пожалуйста такой момент, есть текстовый файл, в нем кол-во строк не постоянное, в него могут вноситься правки, следовательно по номеру строки с начала документа не возможно отследить нужную строку. В конце этого файла, а именно 10 строк с конца документа - не изменные, и внутри этих строк надо изменить определенный символ, например 5 символов от 3-го символа с начала строки №2 от конца документа

С помощью такого кода
Код:
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;

я могу считать только последнюю строку, а мне надо считать вторую с низа строку и изменить ее. Подскажите как это сделать?
Ответить с цитированием