Memo1.Lines.LoadFromFile: Den er vist let, den her.

Jeg skal læse indholdet af en tekstfil ind i memo\'en.

Når jeg prøver at køre nedenstående procedure, kommer Delphi med den her fejlmeddelelse:
Incompatible types: \'String\' and \'Text\'

procedure TForm1.btnOpenClick(Sender: TObject);
var
DataFile: TextFile;
begin
  if OpenDialog1.Execute then 
  begin
    AssignFile(DataFile, OpenDialog1.FileName);
    reset(DataFile);

      Memo1.Lines.LoadFromFile(DataFile);

    Flush(DataFile);           
    CloseFile(DataFile);

    end
  else
    exit;

end;

Hva\' dælen gør jeg forkert ???