Процедура выдачи из файла

[grafgrial]

не могу написать процедуру для вызова следующей строки из файла
например с помощью таймера, а выводлась строка в едит
помогите

[Marsel737]

Загружаете текст в мемо и берёте построчно, мемо можно и динамически создать и невидимым сделать:

Memo1.Lines.LoadFromFile('File.txt');

А в таймере:

ShowMessage(Memo1.Lines[I]);
Inc(I);

[grafgrial]

Что то он матерится на код в таймере и не выдает

[Marsel737]

Если текста нет, то он и будет материться, вот такой код в таймер засунь:

var
  intLinesCount: integer;
begin
  intLinesCount := 0;
  if Memo1.Text <> '' then
  begin
    ShowMessage(Memo1.Lines[intLinesCount]);
    Inc(intLinesCount);
  end;
end;

[grafgrial]

intLinesCount := 0;

из-за этого в первый раз не показывало
А вот сейчас пошло, но показывает только первую строчку, из за него же не накручивает