Текстовые Файлы Опции

[Dead.MorozZ]

Помогите присвоить метке значение Текстового Файла. Мой код присваивает только первую строку из файла, в чем ошибка???

Код

var
  F: TextFile;
  S: String;
begin
  AssignFile(F, 'Text.txt');
  Reset(F);
  Read(F, S);
  Label1.Caption := S;
end;