[creus]

Necesito poder borrar una caracter dentro de un MEMO pulsando una tecla.
Consigo poner un espacio con el siguiente código,

Código Delphi [-]
 
if (key=#32) then
begin
   Memo.Text:=Memo.Text+' ';
end;

Gracias por la ayuda.