De un txt a un memo

[jorgegetafe]

Hola de nuevo, soy yo, el pesado jajaja.

Quiero pasar el contenido de un archivo txt a un memo. Y no se como hacerlo, he probado con esto, pero me poner errores de sintaxis tontos:

Código Delphi [-]
PROCEDURE cargarArchivo (rutaArchivo:STRING; VAR pantalla:tmemo); // Carga el contenido de un txt en un memo llamado pantalla.
TYPE
  fichero = text;
VAR
  f: fichero;
  c: char;
BEGIN
  pantalla.Text:='';
  assign (f, rutaArchivo);
  reset (f);
  WHILE NOT eof(f) DO
    BEGIN
      read (f, char); //ERROR: "(" Expected but ")" found. Este error no tiene   sentido y me descoloca por completo.
      pantalla.text:= (pantalla.lines + char); // ERROR: Left side can not be     assignet to right side. ¿Como se hace entonces?
END;
    close (f);
END;