Delphi - Problema con un tmemo

Necesito conseguir que en un campo memo si se abre un documento vacio o simplemente el memo esta vacio que salga una ventana al pulsar un boton con un mensaje diciendo que no hay nada seleccionado el codigo que pongo es este:

procedure TForm1.Button1Click(Sender: TObject);
begin
if memo2.lines = ' ' then
showmessage ('El documento esta vacio');
end;

Pero me da el error:

[Error] Unit1.pas(61): Incompatible types: 'String' and 'TStrings'

Como puedo solucionar este error .

Gracias.

El problema es sencillo, La propiedad Lines del componente TMemo no se trata de un String si no de un TString, es decir es un array de Strings, As{i que necesitas de un m{etodo o una propiedad que maneje ese tipo de datos. Prueba esto:

if memo.lines.count=0 then
//El memo esta vacio

Espero que el problema se resuelva. Un consejo, usa la ayuda de delphi , aunque en ingles es muy completa