Cambiar de linea en un Memo
 

Como puedo cambiar de linea en un Memo pulsando la tecla ENTER?

Ej: Santiago estaba [enter,#13] linea1
comiendo linea2



Gracias por la ayuda

Esta es la idea:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
memo1.Lines[1]:=memo1.Lines[1]+' comiendo un plátano.';
end;

Un Saludo.